1 /* $OpenBSD: lpf.c,v 1.13 2015/02/09 23:00:14 deraadt Exp $ */
2 /* $NetBSD: lpf.c,v 1.8 2000/04/29 00:12:32 abs Exp $ */
3
4 /*
5 * Copyright (c) 1983, 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. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32
33 /*
34 * filter which reads the output of nroff and converts lines
35 * with ^H's to overwritten lines. Thus this works like 'ul'
36 * but is much better: it can handle more than 2 overwrites
37 * and it is written with some style.
38 */
39
40 #include <signal.h>
41 #include <stdlib.h>
42 #include <stdio.h>
43 #include <string.h>
44 #include <unistd.h>
45
46 #define MAXWIDTH 132
47 #define MAXREP 10
48
49 char buf[MAXREP][MAXWIDTH];
50 int maxcol[MAXREP] = {-1};
51 int lineno;
52 int width = 132; /* default line length */
53 int length = 66; /* page length */
54 int indent; /* indentation length */
55 int npages = 1;
56 int literal; /* print control characters */
57 int onlcr; /* map nl->cr-nl */
58 char *name; /* user's login name */
59 char *host; /* user's machine name */
60 char *acctfile; /* accounting information file */
61
62 __dead void usage(void);
63
64 int
main(int argc,char ** argv)65 main(int argc, char **argv)
66 {
67 FILE *p = stdin, *o = stdout;
68 int i, col;
69 char *cp;
70 int done, linedone, maxrep, ch;
71 char *limit;
72
73 while ((ch = getopt(argc, argv, "crh:i:j:l:n:w:")) != -1) {
74 switch (ch) {
75 case 'n':
76 name = optarg;
77 break;
78 case 'h':
79 host = optarg;
80 break;
81 case 'w':
82 if ((i = atoi(optarg)) > 0 && i <= MAXWIDTH)
83 width = i;
84 break;
85 case 'l':
86 length = atoi(optarg);
87 break;
88 case 'i':
89 indent = atoi(optarg);
90 break;
91 case 'r': /* map nl->cr-nl */
92 onlcr = 1;
93 break;
94 case 'c': /* Print control chars */
95 literal++;
96 break;
97 case 'j': /* ignore job name */
98 break;
99 default:
100 usage();
101 }
102 }
103 argc -= optind;
104 argv += optind;
105 if (argc)
106 acctfile = *argv;
107
108 memset(buf, ' ', sizeof(buf));
109 done = 0;
110
111 while (!done) {
112 col = indent;
113 maxrep = -1;
114 linedone = 0;
115 while (!linedone) {
116 switch (ch = getc(p)) {
117 case EOF:
118 linedone = done = 1;
119 ch = '\n';
120 break;
121
122 case '\f':
123 lineno = length;
124 case '\n':
125 if (maxrep < 0)
126 maxrep = 0;
127 linedone = 1;
128 break;
129
130 case '\b':
131 if (--col < indent)
132 col = indent;
133 break;
134
135 case '\r':
136 col = indent;
137 break;
138
139 case '\t':
140 col = ((col - indent) | 07) + indent + 1;
141 break;
142
143 case '\031':
144 /*
145 * lpd needs to use a different filter to
146 * print data so stop what we are doing and
147 * wait for lpd to restart us.
148 */
149 if ((ch = getchar()) == '\1') {
150 fflush(stdout);
151 kill(getpid(), SIGSTOP);
152 break;
153 } else {
154 ungetc(ch, stdin);
155 ch = '\031';
156 }
157
158 default:
159 if (col >= width || (!literal && ch < ' ')) {
160 col++;
161 break;
162 }
163 cp = &buf[0][col];
164 for (i = 0; i < MAXREP; i++) {
165 if (i > maxrep)
166 maxrep = i;
167 if (*cp == ' ') {
168 *cp = ch;
169 if (col > maxcol[i])
170 maxcol[i] = col;
171 break;
172 }
173 cp += MAXWIDTH;
174 }
175 col++;
176 break;
177 }
178 }
179
180 /* print out lines */
181 for (i = 0; i <= maxrep; i++) {
182 for (cp = buf[i], limit = cp+maxcol[i]; cp <= limit;) {
183 putc(*cp, o);
184 *cp++ = ' ';
185 }
186 if (i < maxrep)
187 putc('\r', o);
188 else {
189 if (onlcr)
190 putc('\r', o);
191 putc(ch, o);
192 }
193 if (++lineno >= length) {
194 fflush(o);
195 npages++;
196 lineno = 0;
197 }
198 maxcol[i] = -1;
199 }
200 }
201 if (lineno) { /* be sure to end on a page boundary */
202 putchar('\f');
203 npages++;
204 }
205 if (name && acctfile && access(acctfile, 02) >= 0 &&
206 freopen(acctfile, "a", stdout) != NULL) {
207 printf("%7.2f\t%s:%s\n", (float)npages, host, name);
208 }
209 exit(0);
210 }
211
212 __dead void
usage(void)213 usage(void)
214 {
215 extern char *__progname;
216
217 fprintf(stderr, "usage: %s [-c] [-r] [-h host] [-i indent] [-l length]"
218 " [-n name] [-w width] [acctfile]\n", __progname);
219 exit(1);
220 }
221