OpenSolaris_b135/cmd/banner/banner.c
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
/*
* Copyright 2005 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/types.h>
#define nchars 128 /* number of chars in char set */
#define nlines 7 /* number of lines in a banner character */
#define pposs 85 /* number of print positions */
/* on a line (must be multiple of 4) */
/* followed by end of string character */
#define pospch 8 /* number of char positions per banner char */
#define chpln 10 /* number of banner characters per line */
struct bann {
char alpha[nlines][pposs];
};
static struct bann buffer, *bp = &buffer;
static char ctbl[nchars][nlines] = {
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* below 040 */
0, 000, 000, 000, 000, 000, 000, /* */
034, 034, 034, 010, 0, 034, 034, /* ! */
0167, 0167, 042, 0, 0, 0, 0, /* " */
024, 024, 0177, 024, 0177, 024, 024, /* # */
076, 0111, 0110, 076, 011, 0111, 076, /* $ */
0161, 0122, 0164, 010, 027, 045, 0107, /* % */
030, 044, 030, 070, 0105, 0102, 071, /* & */
034, 034, 010, 020, 0, 0, 0, /* ' */
014, 020, 040, 040, 040, 020, 014, /* ( */
030, 4, 2, 2, 2, 4, 030, /* ) */
0, 042, 024, 0177, 024, 042, 0, /* * */
0, 010, 010, 076, 010, 010, 0, /* + */
0, 0, 0, 034, 034, 010, 020, /* , */
0, 0, 0, 076, 0, 0, 0, /* - */
0, 0, 0, 0, 034, 034, 034, /* . */
1, 2, 4, 010, 020, 040, 0100, /* / */
034, 042, 0101, 0101, 0101, 042, 034, /* 0 */
010, 030, 050, 010, 010, 010, 076, /* 1 */
076, 0101, 1, 076, 0100, 0100, 0177, /* 2 */
076, 0101, 1, 076, 1, 0101, 076, /* 3 */
0100, 0102, 0102, 0102, 0177, 2, 2, /* 4 */
0177, 0100, 0100, 0176, 1, 0101, 076, /* 5 */
076, 0101, 0100, 0176, 0101, 0101, 076, /* 6 */
0177, 0102, 04, 010, 020, 020, 020, /* 7 */
076, 0101, 0101, 076, 0101, 0101, 076, /* 8 */
076, 0101, 0101, 077, 1, 0101, 076, /* 9 */
010, 034, 010, 0, 010, 034, 010, /* : */
034, 034, 0, 034, 034, 010, 020, /* ; */
4, 010, 020, 040, 020, 010, 4, /* < */
0, 0, 076, 0, 076, 0, 0, /* = */
020, 010, 4, 2, 4, 010, 020, /* > */
076, 0101, 1, 016, 010, 0, 010, /* ? */
076, 0101, 0135, 0135, 0136, 0100, 076, /* @ */
010, 024, 042, 0101, 0177, 0101, 0101, /* A */
0176, 0101, 0101, 0176, 0101, 0101, 0176, /* B */
076, 0101, 0100, 0100, 0100, 0101, 076, /* C */
0176, 0101, 0101, 0101, 0101, 0101, 0176, /* D */
0177, 0100, 0100, 0174, 0100, 0100, 0177, /* E */
0177, 0100, 0100, 0174, 0100, 0100, 0100, /* F */
076, 0101, 0100, 0117, 0101, 0101, 076, /* G */
0101, 0101, 0101, 0177, 0101, 0101, 0101, /* H */
034, 010, 010, 010, 010, 010, 034, /* I */
1, 1, 1, 1, 0101, 0101, 076, /* J */
0102, 0104, 0110, 0160, 0110, 0104, 0102, /* K */
0100, 0100, 0100, 0100, 0100, 0100, 0177, /* L */
0101, 0143, 0125, 0111, 0101, 0101, 0101, /* M */
0101, 0141, 0121, 0111, 0105, 0103, 0101, /* N */
0177, 0101, 0101, 0101, 0101, 0101, 0177, /* O */
0176, 0101, 0101, 0176, 0100, 0100, 0100, /* P */
076, 0101, 0101, 0101, 0105, 0102, 075, /* Q */
0176, 0101, 0101, 0176, 0104, 0102, 0101, /* R */
076, 0101, 0100, 076, 1, 0101, 076, /* S */
0177, 010, 010, 010, 010, 010, 010, /* T */
0101, 0101, 0101, 0101, 0101, 0101, 076, /* U */
0101, 0101, 0101, 0101, 042, 024, 010, /* V */
0101, 0111, 0111, 0111, 0111, 0111, 066, /* W */
0101, 042, 024, 010, 024, 042, 0101, /* X */
0101, 042, 024, 010, 010, 010, 010, /* Y */
0177, 2, 4, 010, 020, 040, 0177, /* Z */
076, 040, 040, 040, 040, 040, 076, /* [ */
0100, 040, 020, 010, 004, 002, 001, /* \ */
076, 2, 2, 2, 2, 2, 076, /* ] */
010, 024, 042, 0, 0, 0, 0, /* ^ */
0, 000, 000, 000, 000, 000, 0177, /* _ */
034, 034, 010, 04, 0, 0, 0, /* ` */
0, 014, 022, 041, 077, 041, 041, /* A */
0, 076, 041, 076, 041, 041, 076, /* B */
0, 036, 041, 040, 040, 041, 036, /* C */
0, 076, 041, 041, 041, 041, 076, /* D */
0, 077, 040, 076, 040, 040, 077, /* E */
0, 077, 040, 076, 040, 040, 040, /* F */
0, 036, 041, 040, 047, 041, 036, /* G */
0, 041, 041, 077, 041, 041, 041, /* H */
0, 004, 004, 004, 004, 004, 004, /* I */
0, 001, 001, 001, 001, 041, 036, /* J */
0, 041, 042, 074, 044, 042, 041, /* K */
0, 040, 040, 040, 040, 040, 077, /* L */
0, 041, 063, 055, 041, 041, 041, /* M */
0, 041, 061, 051, 045, 043, 041, /* N */
0, 036, 041, 041, 041, 041, 036, /* O */
0, 076, 041, 041, 076, 040, 040, /* P */
0, 036, 041, 041, 045, 042, 035, /* Q */
0, 076, 041, 041, 076, 042, 041, /* R */
0, 036, 040, 036, 001, 041, 036, /* S */
0, 037, 004, 004, 004, 004, 004, /* T */
0, 041, 041, 041, 041, 041, 036, /* U */
0, 041, 041, 041, 041, 022, 014, /* V */
0, 041, 041, 041, 055, 063, 041, /* W */
0, 041, 022, 014, 014, 022, 041, /* X */
0, 021, 012, 004, 004, 004, 004, /* Y */
0, 077, 002, 004, 010, 020, 077, /* Z */
034, 040, 040, 0140, 040, 040, 034, /* { */
010, 010, 010, 0, 010, 010, 010, /* | */
034, 2, 2, 3, 2, 2, 034, /* } */
060, 0111, 06, 0, 0, 0, 0, /* ~ */
0, 000, 000, 000, 000, 000, 000 /* DEL */
};
static char blank = ' ';
static char plot = '#';
static int msk = 0100; /* ? */
static void banner(char *s, struct bann *bufp);
static void banfil(char *c, struct bann *p);
static void banset(char c, struct bann *p);
static void banprt(struct bann *ptr);
static char convert(unsigned char c);
int
main(int argc, char **argv)
{
int i;
/*
* if invoked with no arguments, prints error comment
* if invoked with an argument, prints it in banner form.
*/
(void) setlocale(LC_ALL, "");
#if !defined(TEXT_DOMAIN)
#define TEXT_DOMAIN "SYS_TEST"
#endif
(void) textdomain(TEXT_DOMAIN);
if (argc < 2) {
(void) printf(gettext
("Usage: banner \"up to 10 char arg string\" . . .\n"));
exit(1);
}
for (i = 1; i < argc; ++i) {
banner(argv[i], bp);
banprt(bp);
(void) printf("\n");
}
return (0);
}
static void
banner(char *s, struct bann *bufp)
{
char *p, *q;
unsigned char c;
struct bann *r;
p = s;
r = bufp;
banset(blank, bufp);
while ((c = *s++) != 0 && ((ptrdiff_t)s-(ptrdiff_t)p) <= chpln) {
if ((c & 0300)) { /* 8th bit is on */
c = convert(c);
}
q = ctbl[c];
banfil(q, r);
r = (struct bann *)((char *)r + pospch);
}
}
static void
banfil(char *c, struct bann *p)
{
int i, j;
for (i = 0; i < nlines; i++) {
for (j = 0; j < pospch; j++) {
if (((c[i]<<j)&msk) != 0) p->alpha[i][j] = plot;
}
}
}
static void
banset(char c, struct bann *p)
{
int i, j;
for (i = 0; i < nlines; i++)
for (j = 0; j < pposs-1; j++)
p->alpha[i][j] = c;
}
static void
banprt(struct bann *ptr)
{
int i, j;
for (i = 0; i < nlines; i++) {
ptr->alpha[i][pposs-1] = '\0';
for (j = pposs-2; j >= 0; j--) {
if (ptr->alpha[i][j] != blank)break;
ptr->alpha[i][j] = '\0';
}
(void) printf("%s\n", ptr->alpha[i]);
}
}
static char
convert(unsigned char c)
{
if (c >= 0xc0 && c <= 0xc6)
return ('A');
if (c >= 0xc8 && c <= 0xcb)
return ('E');
if (c == 0xc7)
return ('C');
if (c >= 0xcc && c <= 0xcf)
return ('I');
if (c == 0xd0)
return ('D');
if (c == 0xd1)
return ('N');
if (c >= 0xd2 && c <= 0xd6)
return ('O');
if (c == 0xd7)
return ('X');
if (c == 0xd8)
return ('O');
if (c >= 0xd9 && c <= 0xdc)
return ('U');
if (c == 0xdd)
return ('Y');
if (c == 0xde)
return ('P');
if (c == 0xdf)
return ('B');
if (c >= 0xe0 && c <= 0xe6)
return ('a');
if (c == 0xe7)
return ('c');
if (c >= 0xe8 && c <= 0xeb)
return ('e');
if (c >= 0xec && c <= 0xef)
return ('i');
if (c == 0xf0)
return ('d');
if (c == 0xf1)
return ('n');
if (c >= 0xf2 && c <= 0xf6)
return ('o');
if (c >= 0xf9 && c <= 0xfc)
return ('u');
if (c == 0xfd)
return ('y');
if (c == 0xfe)
return ('p');
if (c == 0xff)
return ('y');
return (c & 0177);
}