|
|
1.1 ! root 1: /* ! 2: * Copyright (c) 1988 Regents of the University of California. ! 3: * All rights reserved. ! 4: * ! 5: * Redistribution and use in source and binary forms are permitted ! 6: * provided that the above copyright notice and this paragraph are ! 7: * duplicated in all such forms and that any documentation, ! 8: * advertising materials, and other materials related to such ! 9: * distribution and use acknowledge that the software was developed ! 10: * by the University of California, Berkeley. The name of the ! 11: * University may not be used to endorse or promote products derived ! 12: * from this software without specific prior written permission. ! 13: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR ! 14: * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED ! 15: * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. ! 16: */ ! 17: ! 18: #ifndef lint ! 19: static char sccsid[] = "@(#)asc_ebc.c 4.1 (Berkeley) 12/4/88"; ! 20: #endif /* not lint */ ! 21: ! 22: /* ! 23: * Ascii<->Ebcdic translation tables. ! 24: */ ! 25: ! 26: #include "asc_ebc.h" ! 27: ! 28: unsigned char asc_ebc[NASCII] = { ! 29: ! 30: /* 00 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, ! 31: /* 08 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, ! 32: /* 10 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, ! 33: /* 18 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, ! 34: /* 20 */ 0x40, 0x5A, 0x7F, 0x7B, 0x5B, 0x6C, 0x50, 0x7D, ! 35: /* 28 */ 0x4D, 0x5D, 0x5C, 0x4E, 0x6B, 0x60, 0x4B, 0x61, ! 36: /* 30 */ 0xF0, 0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0xF7, ! 37: /* 38 */ 0xF8, 0xF9, 0x7A, 0x5E, 0x4C, 0x7E, 0x6E, 0x6F, ! 38: /* 40 */ 0x7C, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7, ! 39: /* 48 */ 0xC8, 0xC9, 0xD1, 0xD2, 0xD3, 0xD4, 0xD5, 0xD6, ! 40: /* 50 */ 0xD7, 0xD8, 0xD9, 0xE2, 0xE3, 0xE4, 0xE5, 0xE6, ! 41: /* 58 */ 0xE7, 0xE8, 0xE9, 0xAD, 0xE0, 0xBD, 0x5F, 0x6D, ! 42: /* 60 */ 0x79, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, ! 43: /* 68 */ 0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, ! 44: /* 70 */ 0x97, 0x98, 0x99, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6, ! 45: /* 78 */ 0xA7, 0xA8, 0xA9, 0xC0, 0x4F, 0xD0, 0xA1, 0x00, ! 46: ! 47: }; ! 48: ! 49: /* ! 50: * ebcdic to ascii translation tables ! 51: */ ! 52: ! 53: unsigned char ebc_asc[NEBC] = { ! 54: /* 00 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 55: /* 08 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 56: /* 10 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 57: /* 18 */ ' ', ' ', ' ', ' ', '*', ' ', ';', ' ', ! 58: /* 20 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 59: /* 28 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 60: /* 30 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 61: /* 38 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 62: /* 40 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 63: ! 64: /* 48 */ ' ', ' ', ! 65: #if !defined(MSDOS) ! 66: /* 4A */ '\\', ! 67: #else /* !defined(MSDOS) */ ! 68: /* 4A */ '\233', /* PC cent sign */ ! 69: #endif /* !defined(MSDOS) */ ! 70: /* 4B */ '.', '<', '(', '+', '|', ! 71: ! 72: /* 50 */ '&', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 73: /* 58 */ ' ', ' ', '!', '$', '*', ')', ';', '^', ! 74: /* 60 */ '-', '/', ' ', ' ', ' ', ' ', ' ', ' ', ! 75: /* 68 */ ' ', ' ', '|', ',', '%', '_', '>', '?', ! 76: /* 70 */ ' ', '^', ' ', ' ', ' ', ' ', ' ', ' ', ! 77: /* 78 */ ' ', '`', ':', '#', '@', '\'', '=', '"', ! 78: /* 80 */ ' ', 'a', 'b', 'c', 'd', 'e', 'f', 'g', ! 79: /* 88 */ 'h', 'i', ' ', ' ', ' ', ' ', ' ', ' ', ! 80: /* 90 */ ' ', 'j', 'k', 'l', 'm', 'n', 'o', 'p', ! 81: /* 98 */ 'q', 'r', ' ', ' ', ' ', ' ', ' ', ' ', ! 82: /* A0 */ ' ', '~', 's', 't', 'u', 'v', 'w', 'x', ! 83: /* A8 */ 'y', 'z', ' ', ' ', ' ', '[', ' ', ' ', ! 84: /* B0 */ ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ! 85: /* B8 */ ' ', ' ', ' ', ' ', ' ', ']', ' ', ' ', ! 86: /* C0 */ '{', 'A', 'B', 'C', 'D', 'E', 'F', 'G', ! 87: /* C8 */ 'H', 'I', ' ', ' ', ' ', ' ', ' ', ' ', ! 88: /* D0 */ '}', 'J', 'K', 'L', 'M', 'N', 'O', 'P', ! 89: /* D8 */ 'Q', 'R', ' ', ' ', ' ', ' ', ' ', ' ', ! 90: /* E0 */ '\\', ' ', 'S', 'T', 'U', 'V', 'W', 'X', ! 91: /* E8 */ 'Y', 'Z', ' ', ' ', ' ', ' ', ' ', ' ', ! 92: /* F0 */ '0', '1', '2', '3', '4', '5', '6', '7', ! 93: /* F8 */ '8', '9', ' ', ' ', ' ', ' ', ' ', ' ', ! 94: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.