Annotation of src/usr.bin/soelim/soelim.c, Revision 1.2
1.2 ! deraadt 1: /* $OpenBSD: soelim.c,v 1.3 1994/12/21 08:11:26 jtc Exp $ */
1.1 deraadt 2: /* $NetBSD: soelim.c,v 1.3 1994/12/21 08:11:26 jtc Exp $ */
3:
4: /*
5: * Copyright (c) 1980, 1993
6: * The Regents of the University of California. All rights reserved.
7: *
8: * Redistribution and use in source and binary forms, with or without
9: * modification, are permitted provided that the following conditions
10: * are met:
11: * 1. Redistributions of source code must retain the above copyright
12: * notice, this list of conditions and the following disclaimer.
13: * 2. Redistributions in binary form must reproduce the above copyright
14: * notice, this list of conditions and the following disclaimer in the
15: * documentation and/or other materials provided with the distribution.
16: * 3. All advertising materials mentioning features or use of this software
17: * must display the following acknowledgement:
18: * This product includes software developed by the University of
19: * California, Berkeley and its contributors.
20: * 4. Neither the name of the University nor the names of its contributors
21: * may be used to endorse or promote products derived from this software
22: * without specific prior written permission.
23: *
24: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34: * SUCH DAMAGE.
35: */
36:
37: #ifndef lint
38: static char copyright[] =
39: "@(#) Copyright (c) 1980, 1993\n\
40: The Regents of the University of California. All rights reserved.\n";
41: #endif /* not lint */
42:
43: #ifndef lint
44: #if 0
45: static char sccsid[] = "@(#)soelim.c 8.1 (Berkeley) 6/6/93";
46: #endif
1.2 ! deraadt 47: static char rcsid[] = "$OpenBSD: soelim.c,v 1.3 1994/12/21 08:11:26 jtc Exp $";
1.1 deraadt 48: #endif /* not lint */
49:
50: #include <stdio.h>
51: /*
52: * soelim - a filter to process n/troff input eliminating .so's
53: *
54: * Author: Bill Joy UCB July 8, 1977
55: *
56: * This program eliminates .so's from a n/troff input stream.
57: * It can be used to prepare safe input for submission to the
58: * phototypesetter since the software supporting the operator
59: * doesn't let him do chdir.
60: *
61: * This is a kludge and the operator should be given the
62: * ability to do chdir.
63: *
64: * This program is more generally useful, it turns out, because
65: * the program tbl doesn't understand ".so" directives.
66: */
67: #define STDIN_NAME "-"
68:
69: main(argc, argv)
70: int argc;
71: char *argv[];
72: {
73:
74: argc--;
75: argv++;
76: if (argc == 0) {
77: (void)process(STDIN_NAME);
78: exit(0);
79: }
80: do {
81: (void)process(argv[0]);
82: argv++;
83: argc--;
84: } while (argc > 0);
85: exit(0);
86: }
87:
88: int process(file)
89: char *file;
90: {
91: register char *cp;
92: register int c;
93: char fname[BUFSIZ];
94: FILE *soee;
95: int isfile;
96:
97: if (!strcmp(file, STDIN_NAME)) {
98: soee = stdin;
99: } else {
100: soee = fopen(file, "r");
101: if (soee == NULL) {
102: perror(file);
103: return(-1);
104: }
105: }
106: for (;;) {
107: c = getc(soee);
108: if (c == EOF)
109: break;
110: if (c != '.')
111: goto simple;
112: c = getc(soee);
113: if (c != 's') {
114: putchar('.');
115: goto simple;
116: }
117: c = getc(soee);
118: if (c != 'o') {
119: printf(".s");
120: goto simple;
121: }
122: do
123: c = getc(soee);
124: while (c == ' ' || c == '\t');
125: cp = fname;
126: isfile = 0;
127: for (;;) {
128: switch (c) {
129:
130: case ' ':
131: case '\t':
132: case '\n':
133: case EOF:
134: goto donename;
135:
136: default:
137: *cp++ = c;
138: c = getc(soee);
139: isfile++;
140: continue;
141: }
142: }
143: donename:
144: if (cp == fname) {
145: printf(".so");
146: goto simple;
147: }
148: *cp = 0;
149: if (process(fname) < 0)
150: if (isfile)
151: printf(".so %s\n", fname);
152: continue;
153: simple:
154: if (c == EOF)
155: break;
156: putchar(c);
157: if (c != '\n') {
158: c = getc(soee);
159: goto simple;
160: }
161: }
162: if (soee != stdin) {
163: fclose(soee);
164: }
165: return(0);
166: }