1 /* $OpenBSD: banner.c,v 1.13 2017/05/27 07:55:44 tedu Exp $ */
2 /* $NetBSD: banner.c,v 1.2 1995/04/09 06:00:15 cgd Exp $ */
3
4 /*
5 * Changes for banner(1)
6 *
7 * @(#)Copyright (c) 1995, Simon J. Gerraty.
8 *
9 * This is free software. It comes with NO WARRANTY.
10 * Permission to use, modify and distribute this source code
11 * is granted subject to the following conditions.
12 * 1/ that the above copyright notice and this notice
13 * are preserved in all copies and that due credit be given
14 * to the author.
15 * 2/ that any changes to this code are clearly commented
16 * as such so that the author does not get blamed for bugs
17 * other than his own.
18 *
19 * Please send copies of changes and bug-fixes to:
20 * sjg@zen.void.oz.au
21 */
22
23 /*
24 * Copyright (c) 1983, 1993
25 * The Regents of the University of California. All rights reserved.
26 *
27 * Redistribution and use in source and binary forms, with or without
28 * modification, are permitted provided that the following conditions
29 * are met:
30 * 1. Redistributions of source code must retain the above copyright
31 * notice, this list of conditions and the following disclaimer.
32 * 2. Redistributions in binary form must reproduce the above copyright
33 * notice, this list of conditions and the following disclaimer in the
34 * documentation and/or other materials provided with the distribution.
35 * 3. Neither the name of the University nor the names of its contributors
36 * may be used to endorse or promote products derived from this software
37 * without specific prior written permission.
38 *
39 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
40 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
42 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
43 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
44 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
45 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
46 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
47 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
48 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
49 * SUCH DAMAGE.
50 */
51
52 #include <stdio.h>
53 #include <unistd.h>
54 #include <stdlib.h>
55 #include <string.h>
56 #include <err.h>
57
58 #include "banner.h"
59
60 extern const char scnkey[][HEIGHT]; /* in lpdchar.c */
61
62 static long PW = LINELEN;
63
64 /* the char gen code below is lifted from lpd */
65
66 static char *
scnline(int key,char * p,int c)67 scnline(int key, char *p, int c)
68 {
69 int scnwidth;
70
71 /*
72 * <sjg> lpd makes chars out of the letter in question.
73 * the results are somewhat mixed. Sticking to '#' as
74 * banner(1) does is more consistent.
75 */
76 c = '#';
77
78 for (scnwidth = WIDTH; --scnwidth;) {
79 key <<= 1;
80 *p++ = key & 0200 ? c : BACKGND;
81 }
82 return (p);
83 }
84
85 #define TRC(q) (((q)-' ')&0177)
86
87
88 static int
dropit(int c)89 dropit(int c)
90 {
91 switch(c) {
92
93 case TRC('_'):
94 case TRC(';'):
95 case TRC(','):
96 case TRC('g'):
97 case TRC('j'):
98 case TRC('p'):
99 case TRC('q'):
100 case TRC('y'):
101 return (DROP);
102
103 default:
104 return (0);
105 }
106 }
107
108 static void
scan_out(int scfd,char * scsp,int dlm)109 scan_out(int scfd, char *scsp, int dlm)
110 {
111 char *strp;
112 int nchrs, j;
113 char outbuf[LINELEN+1], *sp, c, cc;
114 int d, scnhgt;
115
116 for (scnhgt = 0; scnhgt++ < HEIGHT+DROP; ) {
117 strp = &outbuf[0];
118 sp = scsp;
119 for (nchrs = 0; *sp != dlm && *sp != '\0'; ) {
120 cc = *sp++;
121 if ((unsigned char)cc < ' ' ||
122 (unsigned char)cc > 0x7f)
123 cc = INVALID;
124
125 c = TRC(cc);
126 d = dropit(c);
127 if ((!d && scnhgt > HEIGHT) || (scnhgt <= DROP && d))
128 for (j = WIDTH; --j;)
129 *strp++ = BACKGND;
130 else
131 strp = scnline(scnkey[(int)c][scnhgt-1-d], strp, cc);
132 if (nchrs++ >= PW/(WIDTH+1)-1)
133 break;
134 *strp++ = BACKGND;
135 }
136 while (*--strp == BACKGND && strp >= outbuf)
137 ;
138 strp++;
139 *strp++ = '\n';
140 write(scfd, outbuf, strp-outbuf);
141 }
142 }
143
144 /*
145 * for each word, print up to 10 chars in big letters.
146 */
147 int
main(int argc __unused,char * argv[])148 main(int argc __unused, char *argv[])
149 {
150 char word[10+1]; /* strings limited to 10 chars */
151
152 while (*++argv) {
153 strlcpy(word, *argv, sizeof (word));
154 scan_out(1, word, '\0');
155 }
156 exit(0);
157 }
158