Mercurial > illumos > onarm
diff usr/src/cmd/banner/banner.c @ 0:c9caec207d52 b86
Initial porting based on b86
author | Koji Uno <koji.uno@sun.com> |
---|---|
date | Tue, 02 Jun 2009 18:56:50 +0900 |
parents | |
children | 1a15d5aaf794 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/usr/src/cmd/banner/banner.c Tue Jun 02 18:56:50 2009 +0900 @@ -0,0 +1,321 @@ +/* + * 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 "@(#)banner.c 1.11 05/06/08 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); +}