1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License, Version 1.0 only 6 * (the "License"). You may not use this file except in compliance 7 * with the License. 8 * 9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10 * or http://www.opensolaris.org/os/licensing. 11 * See the License for the specific language governing permissions 12 * and limitations under the License. 13 * 14 * When distributing Covered Code, include this CDDL HEADER in each 15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16 * If applicable, add the following below this CDDL HEADER, with the 17 * fields enclosed by brackets "[]" replaced with your own identifying 18 * information: Portions Copyright [yyyy] [name of copyright owner] 19 * 20 * CDDL HEADER END 21 */ 22 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */ 23 /* All Rights Reserved */ 24 25 26 /* 27 * Copyright 2005 Sun Microsystems, Inc. All rights reserved. 28 * Use is subject to license terms. 29 */ 30 31 #pragma ident "%Z%%M% %I% %E% SMI" 32 33 #include <locale.h> 34 #include <stdio.h> 35 #include <stdlib.h> 36 #include <sys/types.h> 37 38 #define nchars 128 /* number of chars in char set */ 39 #define nlines 7 /* number of lines in a banner character */ 40 #define pposs 85 /* number of print positions */ 41 /* on a line (must be multiple of 4) */ 42 /* followed by end of string character */ 43 #define pospch 8 /* number of char positions per banner char */ 44 #define chpln 10 /* number of banner characters per line */ 45 46 struct bann { 47 char alpha[nlines][pposs]; 48 }; 49 static struct bann buffer, *bp = &buffer; 50 static char ctbl[nchars][nlines] = { 51 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 52 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 53 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 54 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 55 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 56 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 57 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 58 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 59 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 60 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 61 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 62 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 63 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 64 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 65 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 66 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 67 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 68 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 69 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 70 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 71 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 72 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 73 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 74 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 75 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 76 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 77 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 78 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 79 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 80 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 81 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 82 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 83 0, 000, 000, 000, 000, 000, 000, /* */ 84 034, 034, 034, 010, 0, 034, 034, /* ! */ 85 0167, 0167, 042, 0, 0, 0, 0, /* " */ 86 024, 024, 0177, 024, 0177, 024, 024, /* # */ 87 076, 0111, 0110, 076, 011, 0111, 076, /* $ */ 88 0161, 0122, 0164, 010, 027, 045, 0107, /* % */ 89 030, 044, 030, 070, 0105, 0102, 071, /* & */ 90 034, 034, 010, 020, 0, 0, 0, /* ' */ 91 014, 020, 040, 040, 040, 020, 014, /* ( */ 92 030, 4, 2, 2, 2, 4, 030, /* ) */ 93 0, 042, 024, 0177, 024, 042, 0, /* * */ 94 0, 010, 010, 076, 010, 010, 0, /* + */ 95 0, 0, 0, 034, 034, 010, 020, /* , */ 96 0, 0, 0, 076, 0, 0, 0, /* - */ 97 0, 0, 0, 0, 034, 034, 034, /* . */ 98 1, 2, 4, 010, 020, 040, 0100, /* / */ 99 034, 042, 0101, 0101, 0101, 042, 034, /* 0 */ 100 010, 030, 050, 010, 010, 010, 076, /* 1 */ 101 076, 0101, 1, 076, 0100, 0100, 0177, /* 2 */ 102 076, 0101, 1, 076, 1, 0101, 076, /* 3 */ 103 0100, 0102, 0102, 0102, 0177, 2, 2, /* 4 */ 104 0177, 0100, 0100, 0176, 1, 0101, 076, /* 5 */ 105 076, 0101, 0100, 0176, 0101, 0101, 076, /* 6 */ 106 0177, 0102, 04, 010, 020, 020, 020, /* 7 */ 107 076, 0101, 0101, 076, 0101, 0101, 076, /* 8 */ 108 076, 0101, 0101, 077, 1, 0101, 076, /* 9 */ 109 010, 034, 010, 0, 010, 034, 010, /* : */ 110 034, 034, 0, 034, 034, 010, 020, /* ; */ 111 4, 010, 020, 040, 020, 010, 4, /* < */ 112 0, 0, 076, 0, 076, 0, 0, /* = */ 113 020, 010, 4, 2, 4, 010, 020, /* > */ 114 076, 0101, 1, 016, 010, 0, 010, /* ? */ 115 076, 0101, 0135, 0135, 0136, 0100, 076, /* @ */ 116 010, 024, 042, 0101, 0177, 0101, 0101, /* A */ 117 0176, 0101, 0101, 0176, 0101, 0101, 0176, /* B */ 118 076, 0101, 0100, 0100, 0100, 0101, 076, /* C */ 119 0176, 0101, 0101, 0101, 0101, 0101, 0176, /* D */ 120 0177, 0100, 0100, 0174, 0100, 0100, 0177, /* E */ 121 0177, 0100, 0100, 0174, 0100, 0100, 0100, /* F */ 122 076, 0101, 0100, 0117, 0101, 0101, 076, /* G */ 123 0101, 0101, 0101, 0177, 0101, 0101, 0101, /* H */ 124 034, 010, 010, 010, 010, 010, 034, /* I */ 125 1, 1, 1, 1, 0101, 0101, 076, /* J */ 126 0102, 0104, 0110, 0160, 0110, 0104, 0102, /* K */ 127 0100, 0100, 0100, 0100, 0100, 0100, 0177, /* L */ 128 0101, 0143, 0125, 0111, 0101, 0101, 0101, /* M */ 129 0101, 0141, 0121, 0111, 0105, 0103, 0101, /* N */ 130 0177, 0101, 0101, 0101, 0101, 0101, 0177, /* O */ 131 0176, 0101, 0101, 0176, 0100, 0100, 0100, /* P */ 132 076, 0101, 0101, 0101, 0105, 0102, 075, /* Q */ 133 0176, 0101, 0101, 0176, 0104, 0102, 0101, /* R */ 134 076, 0101, 0100, 076, 1, 0101, 076, /* S */ 135 0177, 010, 010, 010, 010, 010, 010, /* T */ 136 0101, 0101, 0101, 0101, 0101, 0101, 076, /* U */ 137 0101, 0101, 0101, 0101, 042, 024, 010, /* V */ 138 0101, 0111, 0111, 0111, 0111, 0111, 066, /* W */ 139 0101, 042, 024, 010, 024, 042, 0101, /* X */ 140 0101, 042, 024, 010, 010, 010, 010, /* Y */ 141 0177, 2, 4, 010, 020, 040, 0177, /* Z */ 142 076, 040, 040, 040, 040, 040, 076, /* [ */ 143 0100, 040, 020, 010, 004, 002, 001, /* \ */ 144 076, 2, 2, 2, 2, 2, 076, /* ] */ 145 010, 024, 042, 0, 0, 0, 0, /* ^ */ 146 0, 000, 000, 000, 000, 000, 0177, /* _ */ 147 034, 034, 010, 04, 0, 0, 0, /* ` */ 148 0, 014, 022, 041, 077, 041, 041, /* A */ 149 0, 076, 041, 076, 041, 041, 076, /* B */ 150 0, 036, 041, 040, 040, 041, 036, /* C */ 151 0, 076, 041, 041, 041, 041, 076, /* D */ 152 0, 077, 040, 076, 040, 040, 077, /* E */ 153 0, 077, 040, 076, 040, 040, 040, /* F */ 154 0, 036, 041, 040, 047, 041, 036, /* G */ 155 0, 041, 041, 077, 041, 041, 041, /* H */ 156 0, 004, 004, 004, 004, 004, 004, /* I */ 157 0, 001, 001, 001, 001, 041, 036, /* J */ 158 0, 041, 042, 074, 044, 042, 041, /* K */ 159 0, 040, 040, 040, 040, 040, 077, /* L */ 160 0, 041, 063, 055, 041, 041, 041, /* M */ 161 0, 041, 061, 051, 045, 043, 041, /* N */ 162 0, 036, 041, 041, 041, 041, 036, /* O */ 163 0, 076, 041, 041, 076, 040, 040, /* P */ 164 0, 036, 041, 041, 045, 042, 035, /* Q */ 165 0, 076, 041, 041, 076, 042, 041, /* R */ 166 0, 036, 040, 036, 001, 041, 036, /* S */ 167 0, 037, 004, 004, 004, 004, 004, /* T */ 168 0, 041, 041, 041, 041, 041, 036, /* U */ 169 0, 041, 041, 041, 041, 022, 014, /* V */ 170 0, 041, 041, 041, 055, 063, 041, /* W */ 171 0, 041, 022, 014, 014, 022, 041, /* X */ 172 0, 021, 012, 004, 004, 004, 004, /* Y */ 173 0, 077, 002, 004, 010, 020, 077, /* Z */ 174 034, 040, 040, 0140, 040, 040, 034, /* { */ 175 010, 010, 010, 0, 010, 010, 010, /* | */ 176 034, 2, 2, 3, 2, 2, 034, /* } */ 177 060, 0111, 06, 0, 0, 0, 0, /* ~ */ 178 0, 000, 000, 000, 000, 000, 000 /* DEL */ 179 }; 180 static char blank = ' '; 181 static char plot = '#'; 182 static int msk = 0100; /* ? */ 183 184 static void banner(char *s, struct bann *bufp); 185 static void banfil(char *c, struct bann *p); 186 static void banset(char c, struct bann *p); 187 static void banprt(struct bann *ptr); 188 static char convert(unsigned char c); 189 190 int 191 main(int argc, char **argv) 192 { 193 int i; 194 /* 195 * if invoked with no arguments, prints error comment 196 * if invoked with an argument, prints it in banner form. 197 */ 198 (void) setlocale(LC_ALL, ""); 199 #if !defined(TEXT_DOMAIN) 200 #define TEXT_DOMAIN "SYS_TEST" 201 #endif 202 (void) textdomain(TEXT_DOMAIN); 203 if (argc < 2) { 204 (void) printf(gettext 205 ("Usage: banner \"up to 10 char arg string\" . . .\n")); 206 exit(1); 207 } 208 for (i = 1; i < argc; ++i) { 209 banner(argv[i], bp); 210 banprt(bp); 211 (void) printf("\n"); 212 } 213 return (0); 214 } 215 216 static void 217 banner(char *s, struct bann *bufp) 218 { 219 char *p, *q; 220 unsigned char c; 221 struct bann *r; 222 p = s; 223 r = bufp; 224 banset(blank, bufp); 225 while ((c = *s++) != 0 && ((ptrdiff_t)s-(ptrdiff_t)p) <= chpln) { 226 if ((c & 0300)) { /* 8th bit is on */ 227 c = convert(c); 228 } 229 q = ctbl[c]; 230 banfil(q, r); 231 r = (struct bann *)((char *)r + pospch); 232 } 233 } 234 235 static void 236 banfil(char *c, struct bann *p) 237 { 238 int i, j; 239 for (i = 0; i < nlines; i++) { 240 for (j = 0; j < pospch; j++) { 241 if (((c[i]<<j)&msk) != 0) p->alpha[i][j] = plot; 242 } 243 } 244 } 245 246 static void 247 banset(char c, struct bann *p) 248 { 249 int i, j; 250 for (i = 0; i < nlines; i++) 251 for (j = 0; j < pposs-1; j++) 252 p->alpha[i][j] = c; 253 } 254 255 static void 256 banprt(struct bann *ptr) 257 { 258 int i, j; 259 for (i = 0; i < nlines; i++) { 260 ptr->alpha[i][pposs-1] = '\0'; 261 for (j = pposs-2; j >= 0; j--) { 262 if (ptr->alpha[i][j] != blank)break; 263 ptr->alpha[i][j] = '\0'; 264 } 265 (void) printf("%s\n", ptr->alpha[i]); 266 } 267 } 268 269 static char 270 convert(unsigned char c) 271 { 272 if (c >= 0xc0 && c <= 0xc6) 273 return ('A'); 274 if (c >= 0xc8 && c <= 0xcb) 275 return ('E'); 276 if (c == 0xc7) 277 return ('C'); 278 if (c >= 0xcc && c <= 0xcf) 279 return ('I'); 280 if (c == 0xd0) 281 return ('D'); 282 if (c == 0xd1) 283 return ('N'); 284 if (c >= 0xd2 && c <= 0xd6) 285 return ('O'); 286 if (c == 0xd7) 287 return ('X'); 288 if (c == 0xd8) 289 return ('O'); 290 if (c >= 0xd9 && c <= 0xdc) 291 return ('U'); 292 if (c == 0xdd) 293 return ('Y'); 294 if (c == 0xde) 295 return ('P'); 296 if (c == 0xdf) 297 return ('B'); 298 if (c >= 0xe0 && c <= 0xe6) 299 return ('a'); 300 if (c == 0xe7) 301 return ('c'); 302 if (c >= 0xe8 && c <= 0xeb) 303 return ('e'); 304 if (c >= 0xec && c <= 0xef) 305 return ('i'); 306 if (c == 0xf0) 307 return ('d'); 308 if (c == 0xf1) 309 return ('n'); 310 if (c >= 0xf2 && c <= 0xf6) 311 return ('o'); 312 if (c >= 0xf9 && c <= 0xfc) 313 return ('u'); 314 if (c == 0xfd) 315 return ('y'); 316 if (c == 0xfe) 317 return ('p'); 318 if (c == 0xff) 319 return ('y'); 320 return (c & 0177); 321 } 322