Style(9) cleanup.
[dragonfly.git] / usr.sbin / lpr / filters / lpf.c
CommitLineData
984263bc
MD
1/*
2 * Copyright (c) 1983, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
1de703da
MD
32 *
33 * @(#) Copyright (c) 1983, 1993 The Regents of the University of California. All rights reserved.
34 * @(#)lpf.c 8.1 (Berkeley) 6/6/93
35 * $FreeBSD: src/usr.sbin/lpr/filters/lpf.c,v 1.6.2.2 2001/10/13 19:01:45 gad Exp $
be6b9a2e 36 * $DragonFly: src/usr.sbin/lpr/filters/lpf.c,v 1.3 2004/03/22 22:32:50 cpressey Exp $
984263bc
MD
37 */
38
984263bc
MD
39/*
40 * filter which reads the output of nroff and converts lines
41 * with ^H's to overwritten lines. Thus this works like 'ul'
42 * but is much better: it can handle more than 2 overwrites
43 * and it is written with some style.
44 * modified by kls to use register references instead of arrays
45 * to try to gain a little speed.
be6b9a2e
CP
46 * further modified to let the compiler figure out which
47 * variables should be registers; they're very good at it these days.
984263bc
MD
48 */
49
50#include <signal.h>
51#include <unistd.h>
52#include <stdlib.h>
53#include <stdio.h>
54
55#define MAXWIDTH 132
56#define MAXREP 10
57
58char buf[MAXREP][MAXWIDTH];
59int maxcol[MAXREP] = {-1};
60int lineno;
61int width = 132; /* default line length */
62int length = 66; /* page length */
63int indent; /* indentation length */
64int npages = 1;
65int literal; /* print control characters */
66char *name; /* user's login name */
67char *host; /* user's machine name */
68char *acctfile; /* accounting information file */
69
70int
be6b9a2e 71main(int argc, char **argv)
984263bc 72{
be6b9a2e
CP
73 FILE *p = stdin, *o = stdout;
74 int i, col;
75 char *cp;
984263bc
MD
76 int done, linedone, maxrep;
77 char *limit;
78 int ch;
79
80 while (--argc) {
81 if (*(cp = *++argv) == '-') {
82 switch (cp[1]) {
83 case 'n':
84 argc--;
85 name = *++argv;
86 break;
87
88 case 'h':
89 argc--;
90 host = *++argv;
91 break;
92
93 case 'w':
94 if ((i = atoi(&cp[2])) > 0 && i <= MAXWIDTH)
95 width = i;
96 break;
97
98 case 'l':
99 length = atoi(&cp[2]);
100 break;
101
102 case 'i':
103 indent = atoi(&cp[2]);
104 break;
105
106 case 'c': /* Print control chars */
107 literal++;
108 break;
109 }
110 } else
111 acctfile = cp;
112 }
113
114 for (cp = buf[0], limit = buf[MAXREP]; cp < limit; *cp++ = ' ');
115 done = 0;
116
117 while (!done) {
118 col = indent;
119 maxrep = -1;
120 linedone = 0;
121 while (!linedone) {
122 switch (ch = getc(p)) {
123 case EOF:
124 linedone = done = 1;
125 ch = '\n';
126 break;
127
128 case '\f':
129 lineno = length;
130 case '\n':
131 if (maxrep < 0)
132 maxrep = 0;
133 linedone = 1;
134 break;
135
136 case '\b':
137 if (--col < indent)
138 col = indent;
139 break;
140
141 case '\r':
142 col = indent;
143 break;
144
145 case '\t':
146 col = ((col - indent) | 07) + indent + 1;
147 break;
148
149 case '\031':
150 /*
151 * lpd needs to use a different filter to
152 * print data so stop what we are doing and
153 * wait for lpd to restart us.
154 */
155 if ((ch = getchar()) == '\1') {
156 fflush(stdout);
157 kill(getpid(), SIGSTOP);
158 break;
159 } else {
160 ungetc(ch, stdin);
161 ch = '\031';
162 }
163
164 default:
165 if (col >= width || (!literal && ch < ' ')) {
166 col++;
167 break;
168 }
169 cp = &buf[0][col];
170 for (i = 0; i < MAXREP; i++) {
171 if (i > maxrep)
172 maxrep = i;
173 if (*cp == ' ') {
174 *cp = ch;
175 if (col > maxcol[i])
176 maxcol[i] = col;
177 break;
178 }
179 cp += MAXWIDTH;
180 }
181 col++;
182 break;
183 }
184 }
185
186 /* print out lines */
187 for (i = 0; i <= maxrep; i++) {
188 for (cp = buf[i], limit = cp+maxcol[i]; cp <= limit;) {
189 putc(*cp, o);
190 *cp++ = ' ';
191 }
192 if (i < maxrep)
193 putc('\r', o);
194 else
195 putc(ch, o);
196 if (++lineno >= length) {
197 fflush(o);
198 npages++;
199 lineno = 0;
200 }
201 maxcol[i] = -1;
202 }
203 }
204 if (lineno) { /* be sure to end on a page boundary */
205 putchar('\f');
206 npages++;
207 }
208 if (name && acctfile && access(acctfile, 02) >= 0 &&
209 freopen(acctfile, "a", stdout) != NULL) {
210 printf("%7.2f\t%s:%s\n", (float)npages, host, name);
211 }
212 exit(0);
213}