Annotation of src/usr.bin/soelim/soelim.c, Revision 1.4
1.4 ! mpech 1: /* $OpenBSD: soelim.c,v 1.3 1997/09/11 11:21:53 deraadt 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.4 ! mpech 47: static char rcsid[] = "$OpenBSD: soelim.c,v 1.3 1997/09/11 11:21:53 deraadt 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:
1.3 deraadt 69: int process __P((char *file));
70:
71: int
1.1 deraadt 72: main(argc, argv)
73: int argc;
74: char *argv[];
75: {
76:
77: argc--;
78: argv++;
79: if (argc == 0) {
80: (void)process(STDIN_NAME);
81: exit(0);
82: }
83: do {
84: (void)process(argv[0]);
85: argv++;
86: argc--;
87: } while (argc > 0);
88: exit(0);
89: }
90:
91: int process(file)
92: char *file;
93: {
1.4 ! mpech 94: char *cp;
! 95: int c;
1.1 deraadt 96: char fname[BUFSIZ];
97: FILE *soee;
98: int isfile;
99:
100: if (!strcmp(file, STDIN_NAME)) {
101: soee = stdin;
102: } else {
103: soee = fopen(file, "r");
104: if (soee == NULL) {
105: perror(file);
106: return(-1);
107: }
108: }
109: for (;;) {
110: c = getc(soee);
111: if (c == EOF)
112: break;
113: if (c != '.')
114: goto simple;
115: c = getc(soee);
116: if (c != 's') {
117: putchar('.');
118: goto simple;
119: }
120: c = getc(soee);
121: if (c != 'o') {
122: printf(".s");
123: goto simple;
124: }
125: do
126: c = getc(soee);
127: while (c == ' ' || c == '\t');
128: cp = fname;
129: isfile = 0;
130: for (;;) {
131: switch (c) {
132:
133: case ' ':
134: case '\t':
135: case '\n':
136: case EOF:
137: goto donename;
138:
139: default:
140: *cp++ = c;
141: c = getc(soee);
142: isfile++;
143: continue;
144: }
145: }
146: donename:
147: if (cp == fname) {
148: printf(".so");
149: goto simple;
150: }
151: *cp = 0;
152: if (process(fname) < 0)
153: if (isfile)
154: printf(".so %s\n", fname);
155: continue;
156: simple:
157: if (c == EOF)
158: break;
159: putchar(c);
160: if (c != '\n') {
161: c = getc(soee);
162: goto simple;
163: }
164: }
165: if (soee != stdin) {
166: fclose(soee);
167: }
168: return(0);
169: }