usr/src/cmd/banner/banner.c

   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 }