"SfR Fresh" - the SfR Freeware/Shareware Archive

Member "tn3270-5.2.0-glibc/tn3270/api/asc_ebc.c" of archive tn3270-5.2.0-glibc.tgz:


As a special service "SfR Fresh" has tried to format the requested source page into HTML format using (guessed) C and C++ source code syntax highlighting with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file. That can be also achieved for any archive member file by clicking within an archive contents listing on the first character of the file(path) respectively on the according byte size field.
    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 };