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 #include <locale.h> 32 #include <stdio.h> 33 #include <stdlib.h> 34 #include <sys/types.h> 35 36 #define nchars 128 /* number of chars in char set */ 37 #define nlines 7 /* number of lines in a banner character */ 38 #define pposs 85 /* number of print positions */ 39 /* on a line (must be multiple of 4) */ 40 /* followed by end of string character */ 41 #define pospch 8 /* number of char positions per banner char */ 42 #define chpln 10 /* number of banner characters per line */ 43 44 struct bann { 45 char alpha[nlines][pposs]; 46 }; 47 static struct bann buffer, *bp = &buffer; 48 static char ctbl[nchars][nlines] = { 49 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 50 0, 000, 000, 000, 000, 000, 000, /* below 040 */ 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, /* */ 82 034, 034, 034, 010, 0, 034, 034, /* ! */ 83 0167, 0167, 042, 0, 0, 0, 0, /* " */ 84 024, 024, 0177, 024, 0177, 024, 024, /* # */ 85 076, 0111, 0110, 076, 011, 0111, 076, /* $ */ 86 0161, 0122, 0164, 010, 027, 045, 0107, /* % */ 87 030, 044, 030, 070, 0105, 0102, 071, /* & */ 88 034, 034, 010, 020, 0, 0, 0, /* ' */ 89 014, 020, 040, 040, 040, 020, 014, /* ( */ 90 030, 4, 2, 2, 2, 4, 030, /* ) */ 91 0, 042, 024, 0177, 024, 042, 0, /* * */ 92 0, 010, 010, 076, 010, 010, 0, /* + */ 93 0, 0, 0, 034, 034, 010, 020, /* , */ 94 0, 0, 0, 076, 0, 0, 0, /* - */ 95 0, 0, 0, 0, 034, 034, 034, /* . */ 96 1, 2, 4, 010, 020, 040, 0100, /* / */ 97 034, 042, 0101, 0101, 0101, 042, 034, /* 0 */ 98 010, 030, 050, 010, 010, 010, 076, /* 1 */ 99 076, 0101, 1, 076, 0100, 0100, 0177, /* 2 */ 100 076, 0101, 1, 076, 1, 0101, 076, /* 3 */ 101 0100, 0102, 0102, 0102, 0177, 2, 2, /* 4 */ 102 0177, 0100, 0100, 0176, 1, 0101, 076, /* 5 */ 103 076, 0101, 0100, 0176, 0101, 0101, 076, /* 6 */ 104 0177, 0102, 04, 010, 020, 020, 020, /* 7 */ 105 076, 0101, 0101, 076, 0101, 0101, 076, /* 8 */ 106 076, 0101, 0101, 077, 1, 0101, 076, /* 9 */ 107 010, 034, 010, 0, 010, 034, 010, /* : */ 108 034, 034, 0, 034, 034, 010, 020, /* ; */ 109 4, 010, 020, 040, 020, 010, 4, /* < */ 110 0, 0, 076, 0, 076, 0, 0, /* = */ 111 020, 010, 4, 2, 4, 010, 020, /* > */ 112 076, 0101, 1, 016, 010, 0, 010, /* ? */ 113 076, 0101, 0135, 0135, 0136, 0100, 076, /* @ */ 114 010, 024, 042, 0101, 0177, 0101, 0101, /* A */ 115 0176, 0101, 0101, 0176, 0101, 0101, 0176, /* B */ 116 076, 0101, 0100, 0100, 0100, 0101, 076, /* C */ 117 0176, 0101, 0101, 0101, 0101, 0101, 0176, /* D */ 118 0177, 0100, 0100, 0174, 0100, 0100, 0177, /* E */ 119 0177, 0100, 0100, 0174, 0100, 0100, 0100, /* F */ 120 076, 0101, 0100, 0117, 0101, 0101, 076, /* G */ 121 0101, 0101, 0101, 0177, 0101, 0101, 0101, /* H */ 122 034, 010, 010, 010, 010, 010, 034, /* I */ 123 1, 1, 1, 1, 0101, 0101, 076, /* J */ 124 0102, 0104, 0110, 0160, 0110, 0104, 0102, /* K */ 125 0100, 0100, 0100, 0100, 0100, 0100, 0177, /* L */ 126 0101, 0143, 0125, 0111, 0101, 0101, 0101, /* M */ 127 0101, 0141, 0121, 0111, 0105, 0103, 0101, /* N */ 128 0177, 0101, 0101, 0101, 0101, 0101, 0177, /* O */ 129 0176, 0101, 0101, 0176, 0100, 0100, 0100, /* P */ 130 076, 0101, 0101, 0101, 0105, 0102, 075, /* Q */ 131 0176, 0101, 0101, 0176, 0104, 0102, 0101, /* R */ 132 076, 0101, 0100, 076, 1, 0101, 076, /* S */ 133 0177, 010, 010, 010, 010, 010, 010, /* T */ 134 0101, 0101, 0101, 0101, 0101, 0101, 076, /* U */ 135 0101, 0101, 0101, 0101, 042, 024, 010, /* V */ 136 0101, 0111, 0111, 0111, 0111, 0111, 066, /* W */ 137 0101, 042, 024, 010, 024, 042, 0101, /* X */ 138 0101, 042, 024, 010, 010, 010, 010, /* Y */ 139 0177, 2, 4, 010, 020, 040, 0177, /* Z */ 140 076, 040, 040, 040, 040, 040, 076, /* [ */ 141 0100, 040, 020, 010, 004, 002, 001, /* \ */ 142 076, 2, 2, 2, 2, 2, 076, /* ] */ 143 010, 024, 042, 0, 0, 0, 0, /* ^ */ 144 0, 000, 000, 000, 000, 000, 0177, /* _ */ 145 034, 034, 010, 04, 0, 0, 0, /* ` */ 146 0, 014, 022, 041, 077, 041, 041, /* A */ 147 0, 076, 041, 076, 041, 041, 076, /* B */ 148 0, 036, 041, 040, 040, 041, 036, /* C */ 149 0, 076, 041, 041, 041, 041, 076, /* D */ 150 0, 077, 040, 076, 040, 040, 077, /* E */ 151 0, 077, 040, 076, 040, 040, 040, /* F */ 152 0, 036, 041, 040, 047, 041, 036, /* G */ 153 0, 041, 041, 077, 041, 041, 041, /* H */ 154 0, 004, 004, 004, 004, 004, 004, /* I */ 155 0, 001, 001, 001, 001, 041, 036, /* J */ 156 0, 041, 042, 074, 044, 042, 041, /* K */ 157 0, 040, 040, 040, 040, 040, 077, /* L */ 158 0, 041, 063, 055, 041, 041, 041, /* M */ 159 0, 041, 061, 051, 045, 043, 041, /* N */ 160 0, 036, 041, 041, 041, 041, 036, /* O */ 161 0, 076, 041, 041, 076, 040, 040, /* P */ 162 0, 036, 041, 041, 045, 042, 035, /* Q */ 163 0, 076, 041, 041, 076, 042, 041, /* R */ 164 0, 036, 040, 036, 001, 041, 036, /* S */ 165 0, 037, 004, 004, 004, 004, 004, /* T */ 166 0, 041, 041, 041, 041, 041, 036, /* U */ 167 0, 041, 041, 041, 041, 022, 014, /* V */ 168 0, 041, 041, 041, 055, 063, 041, /* W */ 169 0, 041, 022, 014, 014, 022, 041, /* X */ 170 0, 021, 012, 004, 004, 004, 004, /* Y */ 171 0, 077, 002, 004, 010, 020, 077, /* Z */ 172 034, 040, 040, 0140, 040, 040, 034, /* { */ 173 010, 010, 010, 0, 010, 010, 010, /* | */ 174 034, 2, 2, 3, 2, 2, 034, /* } */ 175 060, 0111, 06, 0, 0, 0, 0, /* ~ */ 176 0, 000, 000, 000, 000, 000, 000 /* DEL */ 177 }; 178 static char blank = ' '; 179 static char plot = '#'; 180 static int msk = 0100; /* ? */ 181 182 static void banner(char *s, struct bann *bufp); 183 static void banfil(char *c, struct bann *p); 184 static void banset(char c, struct bann *p); 185 static void banprt(struct bann *ptr); 186 static char convert(unsigned char c); 187 188 int 189 main(int argc, char **argv) 190 { 191 int i; 192 /* 193 * if invoked with no arguments, prints error comment 194 * if invoked with an argument, prints it in banner form. 195 */ 196 (void) setlocale(LC_ALL, ""); 197 #if !defined(TEXT_DOMAIN) 198 #define TEXT_DOMAIN "SYS_TEST" 199 #endif 200 (void) textdomain(TEXT_DOMAIN); 201 if (argc < 2) { 202 (void) printf(gettext 203 ("Usage: banner \"up to 10 char arg string\" . . .\n")); 204 exit(1); 205 } 206 for (i = 1; i < argc; ++i) { 207 banner(argv[i], bp); 208 banprt(bp); 209 (void) printf("\n"); 210 } 211 return (0); 212 } 213 214 static void 215 banner(char *s, struct bann *bufp) 216 { 217 char *p, *q; 218 unsigned char c; 219 struct bann *r; 220 p = s; 221 r = bufp; 222 banset(blank, bufp); 223 while ((c = *s++) != 0 && ((ptrdiff_t)s-(ptrdiff_t)p) <= chpln) { 224 if ((c & 0300)) { /* 8th bit is on */ 225 c = convert(c); 226 } 227 q = ctbl[c]; 228 banfil(q, r); 229 r = (struct bann *)((char *)r + pospch); 230 } 231 } 232 233 static void 234 banfil(char *c, struct bann *p) 235 { 236 int i, j; 237 for (i = 0; i < nlines; i++) { 238 for (j = 0; j < pospch; j++) { 239 if (((c[i]<<j)&msk) != 0) p->alpha[i][j] = plot; 240 } 241 } 242 } 243 244 static void 245 banset(char c, struct bann *p) 246 { 247 int i, j; 248 for (i = 0; i < nlines; i++) 249 for (j = 0; j < pposs-1; j++) 250 p->alpha[i][j] = c; 251 } 252 253 static void 254 banprt(struct bann *ptr) 255 { 256 int i, j; 257 for (i = 0; i < nlines; i++) { 258 ptr->alpha[i][pposs-1] = '\0'; 259 for (j = pposs-2; j >= 0; j--) { 260 if (ptr->alpha[i][j] != blank)break; 261 ptr->alpha[i][j] = '\0'; 262 } 263 (void) printf("%s\n", ptr->alpha[i]); 264 } 265 } 266 267 static char 268 convert(unsigned char c) 269 { 270 if (c >= 0xc0 && c <= 0xc6) 271 return ('A'); 272 if (c >= 0xc8 && c <= 0xcb) 273 return ('E'); 274 if (c == 0xc7) 275 return ('C'); 276 if (c >= 0xcc && c <= 0xcf) 277 return ('I'); 278 if (c == 0xd0) 279 return ('D'); 280 if (c == 0xd1) 281 return ('N'); 282 if (c >= 0xd2 && c <= 0xd6) 283 return ('O'); 284 if (c == 0xd7) 285 return ('X'); 286 if (c == 0xd8) 287 return ('O'); 288 if (c >= 0xd9 && c <= 0xdc) 289 return ('U'); 290 if (c == 0xdd) 291 return ('Y'); 292 if (c == 0xde) 293 return ('P'); 294 if (c == 0xdf) 295 return ('B'); 296 if (c >= 0xe0 && c <= 0xe6) 297 return ('a'); 298 if (c == 0xe7) 299 return ('c'); 300 if (c >= 0xe8 && c <= 0xeb) 301 return ('e'); 302 if (c >= 0xec && c <= 0xef) 303 return ('i'); 304 if (c == 0xf0) 305 return ('d'); 306 if (c == 0xf1) 307 return ('n'); 308 if (c >= 0xf2 && c <= 0xf6) 309 return ('o'); 310 if (c >= 0xf9 && c <= 0xfc) 311 return ('u'); 312 if (c == 0xfd) 313 return ('y'); 314 if (c == 0xfe) 315 return ('p'); 316 if (c == 0xff) 317 return ('y'); 318 return (c & 0177); 319 } 320