File:  [MW Coherent from dump] / coherent / a / usr / src / misc / banner.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Wed May 29 04:56:34 2019 UTC (7 years ago) by root
Branches: MarkWilliams, MAIN
CVS tags: relic, HEAD
coherent

/*
 * Banner -- print in large type
 * banner(char *word, int spaces_in_front);
 */
#include <stdio.h>
static char font[96][9]={
0000,0000,0000,0000,0000,0000,0000,0000,0000,	/* sp */
0010,0010,0010,0010,0010,0000,0010,0000,0000,	/* ! */
0024,0024,0024,0000,0000,0000,0000,0000,0000,	/* " */
0024,0024,0076,0024,0076,0024,0024,0000,0000,	/* # */
0010,0036,0050,0034,0012,0074,0010,0000,0000,	/* $ */
0060,0062,0004,0010,0020,0046,0006,0000,0000,	/* % */
0010,0024,0024,0030,0052,0044,0032,0000,0000,	/* & */
0010,0010,0020,0000,0000,0000,0000,0000,0000,	/* ' */
0004,0010,0020,0020,0020,0010,0004,0000,0000,	/* ( */
0020,0010,0004,0004,0004,0010,0020,0000,0000,	/* ) */
0000,0010,0052,0034,0052,0010,0000,0000,0000,	/* * */
0000,0010,0010,0076,0010,0010,0000,0000,0000,	/* + */
0000,0000,0000,0000,0000,0030,0030,0010,0020,	/* , */
0000,0000,0000,0076,0000,0000,0000,0000,0000,	/* - */
0000,0000,0000,0000,0000,0030,0030,0000,0000,	/* . */
0001,0002,0004,0010,0020,0040,0100,0000,0000,	/* / */
0034,0042,0046,0052,0062,0042,0034,0000,0000,	/* 0 */
0010,0030,0010,0010,0010,0010,0034,0000,0000,	/* 1 */
0034,0042,0002,0004,0010,0020,0076,0000,0000,	/* 2 */
0076,0004,0010,0004,0002,0042,0034,0000,0000,	/* 3 */
0004,0014,0024,0044,0076,0004,0004,0000,0000,	/* 4 */
0076,0040,0074,0002,0002,0042,0034,0000,0000,	/* 5 */
0014,0020,0040,0074,0042,0042,0034,0000,0000,	/* 6 */
0076,0002,0004,0010,0020,0020,0020,0000,0000,	/* 7 */
0034,0042,0042,0034,0042,0042,0034,0000,0000,	/* 8 */
0034,0042,0042,0036,0002,0004,0030,0000,0000,	/* 9 */
0000,0030,0030,0000,0030,0030,0000,0000,0000,	/* : */
0000,0030,0030,0000,0030,0030,0010,0020,0000,	/* ; */
0002,0004,0010,0020,0010,0004,0002,0000,0000,	/* < */
0000,0000,0076,0000,0076,0000,0000,0000,0000,	/* = */
0040,0020,0010,0004,0010,0020,0040,0000,0000,	/* > */
0034,0042,0002,0004,0010,0000,0010,0000,0000,	/* ? */
0014,0022,0056,0052,0056,0040,0036,0000,0000,	/* @ */
0034,0042,0042,0076,0042,0042,0042,0000,0000,	/* A */
0074,0042,0042,0074,0042,0042,0074,0000,0000,	/* B */
0034,0042,0040,0040,0040,0042,0034,0000,0000,	/* C */
0070,0044,0042,0042,0042,0044,0070,0000,0000,	/* D */
0076,0040,0040,0074,0040,0040,0076,0000,0000,	/* E */
0076,0040,0040,0074,0040,0040,0040,0000,0000,	/* F */
0036,0040,0040,0046,0042,0042,0036,0000,0000,	/* G */
0042,0042,0042,0076,0042,0042,0042,0000,0000,	/* H */
0034,0010,0010,0010,0010,0010,0034,0000,0000,	/* I */
0034,0010,0010,0010,0010,0050,0020,0000,0000,	/* J */
0042,0044,0050,0060,0050,0044,0042,0000,0000,	/* K */
0040,0040,0040,0040,0040,0040,0076,0000,0000,	/* L */
0042,0066,0052,0052,0042,0042,0042,0000,0000,	/* M */
0042,0042,0062,0052,0046,0042,0042,0000,0000,	/* N */
0034,0042,0042,0042,0042,0042,0034,0000,0000,	/* O */
0074,0042,0042,0074,0040,0040,0040,0000,0000,	/* P */
0034,0042,0042,0042,0052,0044,0032,0000,0000,	/* Q */
0074,0042,0042,0074,0050,0044,0042,0000,0000,	/* R */
0034,0042,0040,0034,0002,0042,0034,0000,0000,	/* S */
0076,0010,0010,0010,0010,0010,0010,0000,0000,	/* T */
0042,0042,0042,0042,0042,0042,0034,0000,0000,	/* U */
0042,0042,0042,0024,0024,0010,0010,0000,0000,	/* V */
0042,0042,0042,0052,0052,0052,0024,0000,0000,	/* W */
0042,0042,0024,0010,0024,0042,0042,0000,0000,	/* X */
0042,0042,0024,0010,0010,0010,0010,0000,0000,	/* Y */
0076,0002,0004,0010,0020,0040,0076,0000,0000,	/* Z */
0034,0020,0020,0020,0020,0020,0034,0000,0000,	/* [ */
0100,0040,0020,0010,0004,0002,0001,0000,0000,	/* \ */
0034,0004,0004,0004,0004,0004,0034,0000,0000,	/* ] */
0010,0024,0042,0000,0000,0000,0000,0000,0000,	/* ^ */
0000,0000,0000,0000,0000,0000,0076,0000,0000,	/* _ */
0010,0010,0004,0000,0000,0000,0000,0000,0000,	/* ` */
0000,0000,0034,0002,0036,0042,0036,0000,0000,	/* a */
0040,0040,0074,0042,0042,0042,0074,0000,0000,	/* b */
0000,0000,0030,0044,0040,0044,0030,0000,0000,	/* c */
0002,0002,0036,0042,0042,0042,0036,0000,0000,	/* d */
0000,0000,0034,0042,0076,0040,0034,0000,0000,	/* e */
0014,0022,0070,0020,0020,0020,0020,0000,0000,	/* f */
0000,0000,0032,0046,0042,0046,0032,0002,0034,	/* g */
0040,0040,0074,0042,0042,0042,0042,0000,0000,	/* h */
0010,0000,0030,0010,0010,0010,0034,0000,0000,	/* i */
0004,0000,0004,0004,0004,0004,0004,0044,0030,	/* j */
0040,0040,0044,0050,0064,0042,0042,0000,0000,	/* k */
0030,0010,0010,0010,0010,0010,0034,0000,0000,	/* l */
0000,0000,0064,0052,0052,0052,0052,0000,0000,	/* m */
0000,0000,0074,0042,0042,0042,0042,0000,0000,	/* n */
0000,0000,0034,0042,0042,0042,0034,0000,0000,	/* o */
0000,0000,0054,0062,0042,0062,0054,0040,0040,	/* p */
0000,0000,0032,0046,0042,0046,0032,0002,0002,	/* q */
0000,0000,0054,0062,0040,0040,0040,0000,0000,	/* r */
0000,0000,0036,0040,0034,0002,0074,0000,0000,	/* s */
0020,0020,0070,0020,0020,0022,0014,0000,0000,	/* t */
0000,0000,0042,0042,0042,0046,0032,0000,0000,	/* u */
0000,0000,0042,0042,0042,0024,0010,0000,0000,	/* v */
0000,0000,0042,0042,0052,0052,0024,0000,0000,	/* w */
0000,0000,0042,0024,0010,0024,0042,0000,0000,	/* x */
0000,0000,0042,0042,0042,0046,0032,0002,0034,	/* y */
0000,0000,0076,0004,0010,0020,0076,0000,0000,	/* z */
0014,0020,0020,0040,0020,0020,0014,0000,0000,	/* { */
0010,0010,0010,0000,0010,0010,0010,0000,0000,	/* | */
0030,0004,0004,0002,0004,0004,0030,0000,0000,	/* } */
0020,0052,0004,0000,0000,0000,0000,0000,0000,	/* ~ */
0177,0177,0177,0177,0177,0177,0177,0177,0177	/* del */
};

void
banner(word, pad)
unsigned char *word;
{
	register j, f, i;
	unsigned char c;
	register unsigned char *s;

	putchar('\n');
	for(i = 0; i < 9; i++) {
		for(j = 0; j < pad; j++)
			putchar(' ');
		for(s = word; c = *s; s++) {
			f = ((c <= ' ') || (c & 0x80)) ? 0 : font[c - ' '][i];
			for(j = 0x80; j; j >>= 1)
				putchar((f & j) ? c : ' ');
		}
		putchar('\n');
	}
}

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.