|
|
1.1 root 1: /*
2: * Copyright 1984, 1985 by the Regents of the University of
3: * California and by Gregory Glenn Minshall.
4: *
5: * Permission to use, copy, modify, and distribute these
6: * programs and their documentation for any purpose and
7: * without fee is hereby granted, provided that this
8: * copyright and permission appear on all copies and
9: * supporting documentation, the name of the Regents of
10: * the University of California not be used in advertising
11: * or publicity pertaining to distribution of the programs
12: * without specific prior permission, and notice be given in
13: * supporting documentation that copying and distribution is
14: * by permission of the Regents of the University of California
15: * and by Gregory Glenn Minshall. Neither the Regents of the
16: * University of California nor Gregory Glenn Minshall make
17: * representations about the suitability of this software
18: * for any purpose. It is provided "as is" without
19: * express or implied warranty.
20: */
21:
22:
23: /*
24: * ebcdic to ascii translation tables
25: */
26:
27: #include "ascebc.h"
28:
29: #ifndef lint
30: static char sccsid[] = "@(#)ebctab.c 2.3";
31: #endif /* ndef lint */
32:
33: char ebcasc[NEBCASC][NEBC] = {
34: /* 00 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
35: /* 08 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
36: /* 10 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
37: /* 18 */ ' ', ' ', ' ', ' ', '*', ' ', ';', ' ',
38: /* 20 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
39: /* 28 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
40: /* 30 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
41: /* 38 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
42: /* 40 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
43: /* 48 */ ' ', ' ', '\\', '.', '<', '(', '+', '|',
44: /* 50 */ '&', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
45: /* 58 */ ' ', ' ', '!', '$', '*', ')', ';', '^',
46: /* 60 */ '-', '/', ' ', ' ', ' ', ' ', ' ', ' ',
47: /* 68 */ ' ', ' ', ' ', ',', '%', '_', '>', '?',
48: /* 70 */ ' ', '^', ' ', ' ', ' ', ' ', ' ', ' ',
49: /* 78 */ ' ', '`', ':', '#', '@', '\'', '=', '"',
50: /* 80 */ ' ', 'a', 'b', 'c', 'd', 'e', 'f', 'g',
51: /* 88 */ 'h', 'i', ' ', ' ', ' ', ' ', ' ', ' ',
52: /* 90 */ ' ', 'j', 'k', 'l', 'm', 'n', 'o', 'p',
53: /* 98 */ 'q', 'r', ' ', ' ', ' ', ' ', ' ', ' ',
54: /* A0 */ ' ', '~', 's', 't', 'u', 'v', 'w', 'x',
55: /* A8 */ 'y', 'z', ' ', ' ', ' ', '[', ' ', ' ',
56: /* B0 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
57: /* B8 */ ' ', ' ', ' ', ' ', ' ', ']', ' ', ' ',
58: /* C0 */ '{', 'A', 'B', 'C', 'D', 'E', 'F', 'G',
59: /* C8 */ 'H', 'I', ' ', ' ', ' ', ' ', ' ', ' ',
60: /* D0 */ '}', 'J', 'K', 'L', 'M', 'N', 'O', 'P',
61: /* D8 */ 'Q', 'R', ' ', ' ', ' ', ' ', ' ', ' ',
62: /* E0 */ '\\', ' ', 'S', 'T', 'U', 'V', 'W', 'X',
63: /* E8 */ 'Y', 'Z', ' ', ' ', ' ', ' ', ' ', ' ',
64: /* F0 */ '0', '1', '2', '3', '4', '5', '6', '7',
65: /* F8 */ '8', '9', ' ', ' ', ' ', ' ', ' ', ' ',
66: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.