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