xref: /netbsd-src/usr.bin/banner/banner.c (revision 5aefcfdc06931dd97e76246d2fe0302f7b3fe094)
1 /*	$NetBSD: banner.c,v 1.6 2000/10/04 19:50:52 mjl Exp $	*/
2 
3 /*
4  *	Changes for banner(1)
5  *
6  *      @(#)Copyright (c) 1995, Simon J. Gerraty.
7  *
8  *      This is free software.  It comes with NO WARRANTY.
9  *      Permission to use, modify and distribute this source code
10  *      is granted subject to the following conditions.
11  *      1/ that the above copyright notice and this notice
12  *      are preserved in all copies and that due credit be given
13  *      to the author.
14  *      2/ that any changes to this code are clearly commented
15  *      as such so that the author does not get blamed for bugs
16  *      other than his own.
17  *
18  *      Please send copies of changes and bug-fixes to:
19  *      sjg@zen.void.oz.au
20  */
21 
22 /*
23  * Copyright (c) 1983, 1993
24  *	The Regents of the University of California.  All rights reserved.
25  *
26  * Redistribution and use in source and binary forms, with or without
27  * modification, are permitted provided that the following conditions
28  * are met:
29  * 1. Redistributions of source code must retain the above copyright
30  *    notice, this list of conditions and the following disclaimer.
31  * 2. Redistributions in binary form must reproduce the above copyright
32  *    notice, this list of conditions and the following disclaimer in the
33  *    documentation and/or other materials provided with the distribution.
34  * 3. All advertising materials mentioning features or use of this software
35  *    must display the following acknowledgement:
36  *	This product includes software developed by the University of
37  *	California, Berkeley and its contributors.
38  * 4. Neither the name of the University nor the names of its contributors
39  *    may be used to endorse or promote products derived from this software
40  *    without specific prior written permission.
41  *
42  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
43  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
44  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
45  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
46  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
47  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
48  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
49  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
50  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
51  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
52  * SUCH DAMAGE.
53  */
54 
55 #include <sys/cdefs.h>
56 #ifndef lint
57 __COPYRIGHT("@(#) Copyright (c) 1983, 1993\n\
58 	The Regents of the University of California.  All rights reserved.\n");
59 #endif /* not lint */
60 
61 #ifndef lint
62 #if 0
63 static char sccsid[] = "@(#)printjob.c	8.2 (Berkeley) 4/16/94";
64 #else
65 __RCSID("$NetBSD: banner.c,v 1.6 2000/10/04 19:50:52 mjl Exp $");
66 #endif
67 #endif /* not lint */
68 
69 #include <stdio.h>
70 #include <stdlib.h>
71 #include <string.h>
72 #include <unistd.h>
73 
74 #include "banner.h"
75 
76 extern char * __progname;
77 
78 static long PW = LINELEN;
79 /*
80  * <sjg> lpd makes chars out of the letter in question.
81  * the results are somewhat mixed.  Sticking to '#' as
82  * banner(1) does is more consistent.
83  */
84 static int ForeGnd = '#';
85 static int BackGnd = ' ';
86 static int Drop = 0;				/* 3 for the LPD font */
87 
88 static	int	dropit (int);
89 static	void	scan_out (int, char *, int);
90 static	char   *scnline (int, char *, int);
91 static	void	usage(void);
92 
93 /* the char gen code below is lifted from lpd */
94 
95 static char *
96 scnline(int key, char *p, int c)
97 {
98 	int scnwidth;
99 
100 	if (ForeGnd)
101 	    c = ForeGnd;
102 
103 	for (scnwidth = WIDTH; --scnwidth;) {
104 		key <<= 1;
105 		*p++ = key & 0200 ? c : BackGnd;
106 	}
107 	return (p);
108 }
109 
110 #define TRC(q)	(((q)-' ')&0177)
111 
112 
113 static int
114 dropit(int c)
115 {
116 	switch(c) {
117 
118 	case TRC('_'):
119 	case TRC(';'):
120 	case TRC(','):
121 	case TRC('g'):
122 	case TRC('j'):
123 	case TRC('p'):
124 	case TRC('q'):
125 	case TRC('y'):
126 		return (Drop);
127 
128 	default:
129 		return (0);
130 	}
131 }
132 
133 static void
134 scan_out(int scfd, char *scsp, int dlm)
135 {
136 	char *strp;
137 	int nchrs, j;
138 	char outbuf[LINELEN+1], *sp, c, cc;
139 	int d, scnhgt;
140 
141 	for (scnhgt = 0; scnhgt++ < HEIGHT+Drop; ) {
142 		strp = &outbuf[0];
143 		if (BackGnd != ' ')
144 		    *strp++ = BackGnd;
145 		sp = scsp;
146 		for (nchrs = 0; ; ) {
147 			d = dropit(c = TRC(cc = *sp++));
148 			if ((!d && scnhgt > HEIGHT) || (scnhgt <= Drop && d))
149 				for (j = WIDTH; --j;)
150 					*strp++ = BackGnd;
151 			else if (Drop == 0)
152 				strp = scnline(
153 				    scnkey_def[(int)c][scnhgt-1-d], strp, cc);
154 			else
155 				strp = scnline(
156 				    scnkey_lpd[(int)c][scnhgt-1-d], strp, cc);
157 			if (*sp == dlm || *sp == '\0' || nchrs++ >= PW/(WIDTH+1)-1)
158 				break;
159 			*strp++ = BackGnd;
160 		}
161 		if (BackGnd != ' ')
162 		    *strp++ = BackGnd;
163 		else {
164 		    while (*--strp == ' ' && strp >= outbuf)
165 			;
166 		    strp++;
167 		}
168 		*strp++ = '\n';
169 		(void) write(scfd, outbuf, strp-outbuf);
170 	}
171 }
172 
173 /*
174  * for each word, print up to 10 chars in big letters.
175  */
176 int
177 main(int argc, char **argv)
178 {
179 	char word[10+1];		/* strings limited to 10 chars */
180 	int c;
181 
182 	while ((c = getopt(argc, argv, "b:f:l")) != -1) {
183 	    switch (c) {
184 	    case 'f':
185 		if (*optarg == '-')
186 		    ForeGnd = 0;
187 		else
188 		    ForeGnd = *optarg;
189 		break;
190 	    case 'b':
191 		BackGnd = *optarg;
192 		break;
193 	    case 'l':
194 		Drop = 3;			/* for LPD font */
195 		break;
196 	    default:
197 		usage();
198 	    }
199 	}
200 
201 	for (; optind < argc; ++optind) {
202 		(void)strncpy(word, argv[optind], sizeof (word) - 1);
203 		word[sizeof (word) - 1] = '\0';
204 		scan_out(1, word, '\0');
205 	}
206 	exit(0);
207 }
208 
209 void
210 usage(void)
211 {
212     fprintf(stderr, "usage: %s [-f fgchar] [-b bgchar] [-l] message...\n",
213 	__progname);
214     exit(1);
215 }
216