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 * 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 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 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 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