arch/s390/kernel/ebcdic.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  *    ECBDIC -> ASCII, ASCII -> ECBDIC,
   4  *    upper to lower case (EBCDIC) conversion tables.
   5  *
   6  *  S390 version
   7  *    Copyright IBM Corp. 1999
   8  *    Author(s): Martin Schwidefsky <schwidefsky@de.ibm.com>
   9  *               Martin Peschke <peschke@fh-brandenburg.de>
  10  */
  11
  12 #include <linux/types.h>
  13 #include <linux/export.h>
  14 #include <asm/ebcdic.h>
  15
  16 /*
  17  * ASCII (IBM PC 437)  -> EBCDIC 037
  18  */
  19 __u8 _ascebc[256] =
  20 {
  21  /*00 NUL   SOH   STX   ETX   EOT   ENQ   ACK   BEL */
  22      0x00, 0x01, 0x02, 0x03, 0x37, 0x2D, 0x2E, 0x2F,
  23  /*08  BS    HT    LF    VT    FF    CR    SO    SI */
  24  /*              ->NL                               */
  25      0x16, 0x05, 0x15, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
  26  /*10 DLE   DC1   DC2   DC3   DC4   NAK   SYN   ETB */
  27      0x10, 0x11, 0x12, 0x13, 0x3C, 0x3D, 0x32, 0x26,
  28  /*18 CAN    EM   SUB   ESC    FS    GS    RS    US */
  29  /*                               ->IGS ->IRS ->IUS */
  30      0x18, 0x19, 0x3F, 0x27, 0x22, 0x1D, 0x1E, 0x1F,
  31  /*20  SP     !     "     #     $     %     &     ' */
  32      0x40, 0x5A, 0x7F, 0x7B, 0x5B, 0x6C, 0x50, 0x7D,
  33  /*28   (     )     *     +     ,     -    .      / */
  34      0x4D, 0x5D, 0x5C, 0x4E, 0x6B, 0x60, 0x4B, 0x61,
  35  /*30   0     1     2     3     4     5     6     7 */
  36      0xF0, 0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0xF7,
  37  /*38   8     9     :     ;     <     =     >     ? */
  38      0xF8, 0xF9, 0x7A, 0x5E, 0x4C, 0x7E, 0x6E, 0x6F,
  39  /*40   @     A     B     C     D     E     F     G */
  40      0x7C, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7,
  41  /*48   H     I     J     K     L     M     N     O */
  42      0xC8, 0xC9, 0xD1, 0xD2, 0xD3, 0xD4, 0xD5, 0xD6,
  43  /*50   P     Q     R     S     T     U     V     W */
  44      0xD7, 0xD8, 0xD9, 0xE2, 0xE3, 0xE4, 0xE5, 0xE6,
  45  /*58   X     Y     Z     [     \     ]     ^     _ */
  46      0xE7, 0xE8, 0xE9, 0xBA, 0xE0, 0xBB, 0xB0, 0x6D,
  47  /*60   `     a     b     c     d     e     f     g */
  48      0x79, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,
  49  /*68   h     i     j     k     l     m     n     o */
  50      0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96,
  51  /*70   p     q     r     s     t     u     v     w */
  52      0x97, 0x98, 0x99, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6,
  53  /*78   x     y     z     {     |     }     ~    DL */
  54      0xA7, 0xA8, 0xA9, 0xC0, 0x4F, 0xD0, 0xA1, 0x07,
  55  /*80*/
  56      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  57  /*88*/
  58      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  59  /*90*/
  60      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  61  /*98*/
  62      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  63  /*A0*/
  64      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  65  /*A8*/
  66      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  67  /*B0*/
  68      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  69  /*B8*/
  70      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  71  /*C0*/
  72      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  73  /*C8*/
  74      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  75  /*D0*/
  76      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  77  /*D8*/
  78      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  79  /*E0        sz                                         */
  80      0x3F, 0x59, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  81  /*E8*/
  82      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  83  /*F0*/
  84      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
  85  /*F8*/
  86      0x90, 0x3F, 0x3F, 0x3F, 0x3F, 0xEA, 0x3F, 0xFF
  87 };
  88
  89 /*
  90  * EBCDIC 037 -> ASCII (IBM PC 437)
  91  */
  92 __u8 _ebcasc[256] =
  93 {
  94  /* 0x00   NUL   SOH   STX   ETX  *SEL    HT  *RNL   DEL */
  95           0x00, 0x01, 0x02, 0x03, 0x07, 0x09, 0x07, 0x7F,
  96  /* 0x08   -GE  -SPS  -RPT    VT    FF    CR    SO    SI */
  97           0x07, 0x07, 0x07, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
  98  /* 0x10   DLE   DC1   DC2   DC3  -RES   -NL    BS  -POC
  99                                   -ENP  ->LF             */
 100           0x10, 0x11, 0x12, 0x13, 0x07, 0x0A, 0x08, 0x07,
 101  /* 0x18   CAN    EM  -UBS  -CU1  -IFS  -IGS  -IRS  -ITB
 102                                                     -IUS */
 103           0x18, 0x19, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
 104  /* 0x20   -DS  -SOS    FS  -WUS  -BYP    LF   ETB   ESC
 105                                   -INP                   */
 106           0x07, 0x07, 0x1C, 0x07, 0x07, 0x0A, 0x17, 0x1B,
 107  /* 0x28   -SA  -SFE   -SM  -CSP  -MFA   ENQ   ACK   BEL
 108                        -SW                               */
 109           0x07, 0x07, 0x07, 0x07, 0x07, 0x05, 0x06, 0x07,
 110  /* 0x30  ----  ----   SYN   -IR   -PP  -TRN  -NBS   EOT */
 111           0x07, 0x07, 0x16, 0x07, 0x07, 0x07, 0x07, 0x04,
 112  /* 0x38  -SBS   -IT  -RFF  -CU3   DC4   NAK  ----   SUB */
 113           0x07, 0x07, 0x07, 0x07, 0x14, 0x15, 0x07, 0x1A,
 114  /* 0x40    SP   RSP           ä              ----       */
 115           0x20, 0xFF, 0x83, 0x84, 0x85, 0xA0, 0x07, 0x86,
 116  /* 0x48                       .     <     (     +     | */
 117           0x87, 0xA4, 0x9B, 0x2E, 0x3C, 0x28, 0x2B, 0x7C,
 118  /* 0x50     &                                      ---- */
 119           0x26, 0x82, 0x88, 0x89, 0x8A, 0xA1, 0x8C, 0x07,
 120  /* 0x58           ß     !     $     *     )     ;       */
 121           0x8D, 0xE1, 0x21, 0x24, 0x2A, 0x29, 0x3B, 0xAA,
 122  /* 0x60     -     /  ----     Ä  ----  ----  ----       */
 123           0x2D, 0x2F, 0x07, 0x8E, 0x07, 0x07, 0x07, 0x8F,
 124  /* 0x68              ----     ,     %     _     >     ? */
 125           0x80, 0xA5, 0x07, 0x2C, 0x25, 0x5F, 0x3E, 0x3F,
 126  /* 0x70  ----        ----  ----  ----  ----  ----  ---- */
 127           0x07, 0x90, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
 128  /* 0x78     *     `     :     #     @     '     =     " */
 129           0x70, 0x60, 0x3A, 0x23, 0x40, 0x27, 0x3D, 0x22,
 130  /* 0x80     *     a     b     c     d     e     f     g */
 131           0x07, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67,
 132  /* 0x88     h     i              ----  ----  ----       */
 133           0x68, 0x69, 0xAE, 0xAF, 0x07, 0x07, 0x07, 0xF1,
 134  /* 0x90     °     j     k     l     m     n     o     p */
 135           0xF8, 0x6A, 0x6B, 0x6C, 0x6D, 0x6E, 0x6F, 0x70,
 136  /* 0x98     q     r                    ----        ---- */
 137           0x71, 0x72, 0xA6, 0xA7, 0x91, 0x07, 0x92, 0x07,
 138  /* 0xA0           ~     s     t     u     v     w     x */
 139           0xE6, 0x7E, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78,
 140  /* 0xA8     y     z              ----  ----  ----  ---- */
 141           0x79, 0x7A, 0xAD, 0xAB, 0x07, 0x07, 0x07, 0x07,
 142  /* 0xB0     ^                    ----     §  ----       */
 143           0x5E, 0x9C, 0x9D, 0xFA, 0x07, 0x07, 0x07, 0xAC,
 144  /* 0xB8        ----     [     ]  ----  ----  ----  ---- */
 145           0xAB, 0x07, 0x5B, 0x5D, 0x07, 0x07, 0x07, 0x07,
 146  /* 0xC0     {     A     B     C     D     E     F     G */
 147           0x7B, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47,
 148  /* 0xC8     H     I  ----           ö              ---- */
 149           0x48, 0x49, 0x07, 0x93, 0x94, 0x95, 0xA2, 0x07,
 150  /* 0xD0     }     J     K     L     M     N     O     P */
 151           0x7D, 0x4A, 0x4B, 0x4C, 0x4D, 0x4E, 0x4F, 0x50,
 152  /* 0xD8     Q     R  ----           ü                   */
 153           0x51, 0x52, 0x07, 0x96, 0x81, 0x97, 0xA3, 0x98,
 154  /* 0xE0     \           S     T     U     V     W     X */
 155           0x5C, 0xF6, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58,
 156  /* 0xE8     Y     Z        ----     Ö  ----  ----  ---- */
 157           0x59, 0x5A, 0xFD, 0x07, 0x99, 0x07, 0x07, 0x07,
 158  /* 0xF0     0     1     2     3     4     5     6     7 */
 159           0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
 160  /* 0xF8     8     9  ----  ----     Ü  ----  ----  ---- */
 161           0x38, 0x39, 0x07, 0x07, 0x9A, 0x07, 0x07, 0x07
 162 };
 163
 164
 165 /*
 166  * ASCII (IBM PC 437)  -> EBCDIC 500
 167  */
 168 __u8 _ascebc_500[256] =
 169 {
 170  /*00 NUL   SOH   STX   ETX   EOT   ENQ   ACK   BEL */
 171      0x00, 0x01, 0x02, 0x03, 0x37, 0x2D, 0x2E, 0x2F,
 172  /*08  BS    HT    LF    VT    FF    CR    SO    SI */
 173  /*              ->NL                               */
 174      0x16, 0x05, 0x15, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
 175  /*10 DLE   DC1   DC2   DC3   DC4   NAK   SYN   ETB */
 176      0x10, 0x11, 0x12, 0x13, 0x3C, 0x3D, 0x32, 0x26,
 177  /*18 CAN    EM   SUB   ESC    FS    GS    RS    US */
 178  /*                               ->IGS ->IRS ->IUS */
 179      0x18, 0x19, 0x3F, 0x27, 0x22, 0x1D, 0x1E, 0x1F,
 180  /*20  SP     !     "     #     $     %     &     ' */
 181      0x40, 0x4F, 0x7F, 0x7B, 0x5B, 0x6C, 0x50, 0x7D,
 182  /*28   (     )     *     +     ,     -    .      / */
 183      0x4D, 0x5D, 0x5C, 0x4E, 0x6B, 0x60, 0x4B, 0x61,
 184  /*30   0     1     2     3     4     5     6     7 */
 185      0xF0, 0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0xF7,
 186  /*38   8     9     :     ;     <     =     >     ? */
 187      0xF8, 0xF9, 0x7A, 0x5E, 0x4C, 0x7E, 0x6E, 0x6F,
 188  /*40   @     A     B     C     D     E     F     G */
 189      0x7C, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7,
 190  /*48   H     I     J     K     L     M     N     O */
 191      0xC8, 0xC9, 0xD1, 0xD2, 0xD3, 0xD4, 0xD5, 0xD6,
 192  /*50   P     Q     R     S     T     U     V     W */
 193      0xD7, 0xD8, 0xD9, 0xE2, 0xE3, 0xE4, 0xE5, 0xE6,
 194  /*58   X     Y     Z     [     \     ]     ^     _ */
 195      0xE7, 0xE8, 0xE9, 0x4A, 0xE0, 0x5A, 0x5F, 0x6D,
 196  /*60   `     a     b     c     d     e     f     g */
 197      0x79, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,
 198  /*68   h     i     j     k     l     m     n     o */
 199      0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96,
 200  /*70   p     q     r     s     t     u     v     w */
 201      0x97, 0x98, 0x99, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6,
 202  /*78   x     y     z     {     |     }     ~    DL */
 203      0xA7, 0xA8, 0xA9, 0xC0, 0xBB, 0xD0, 0xA1, 0x07,
 204  /*80*/
 205      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 206  /*88*/
 207      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 208  /*90*/
 209      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 210  /*98*/
 211      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 212  /*A0*/
 213      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 214  /*A8*/
 215      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 216  /*B0*/
 217      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 218  /*B8*/
 219      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 220  /*C0*/
 221      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 222  /*C8*/
 223      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 224  /*D0*/
 225      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 226  /*D8*/
 227      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 228  /*E0        sz                                         */
 229      0x3F, 0x59, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 230  /*E8*/
 231      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 232  /*F0*/
 233      0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F, 0x3F,
 234  /*F8*/
 235      0x90, 0x3F, 0x3F, 0x3F, 0x3F, 0xEA, 0x3F, 0xFF
 236 };
 237
 238 /*
 239  * EBCDIC 500 -> ASCII (IBM PC 437)
 240  */
 241 __u8 _ebcasc_500[256] =
 242 {
 243  /* 0x00   NUL   SOH   STX   ETX  *SEL    HT  *RNL   DEL */
 244           0x00, 0x01, 0x02, 0x03, 0x07, 0x09, 0x07, 0x7F,
 245  /* 0x08   -GE  -SPS  -RPT    VT    FF    CR    SO    SI */
 246           0x07, 0x07, 0x07, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
 247  /* 0x10   DLE   DC1   DC2   DC3  -RES   -NL    BS  -POC
 248                                   -ENP  ->LF             */
 249           0x10, 0x11, 0x12, 0x13, 0x07, 0x0A, 0x08, 0x07,
 250  /* 0x18   CAN    EM  -UBS  -CU1  -IFS  -IGS  -IRS  -ITB
 251                                                     -IUS */
 252           0x18, 0x19, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
 253  /* 0x20   -DS  -SOS    FS  -WUS  -BYP    LF   ETB   ESC
 254                                   -INP                   */
 255           0x07, 0x07, 0x1C, 0x07, 0x07, 0x0A, 0x17, 0x1B,
 256  /* 0x28   -SA  -SFE   -SM  -CSP  -MFA   ENQ   ACK   BEL
 257                        -SW                               */
 258           0x07, 0x07, 0x07, 0x07, 0x07, 0x05, 0x06, 0x07,
 259  /* 0x30  ----  ----   SYN   -IR   -PP  -TRN  -NBS   EOT */
 260           0x07, 0x07, 0x16, 0x07, 0x07, 0x07, 0x07, 0x04,
 261  /* 0x38  -SBS   -IT  -RFF  -CU3   DC4   NAK  ----   SUB */
 262           0x07, 0x07, 0x07, 0x07, 0x14, 0x15, 0x07, 0x1A,
 263  /* 0x40    SP   RSP           ä              ----       */
 264           0x20, 0xFF, 0x83, 0x84, 0x85, 0xA0, 0x07, 0x86,
 265  /* 0x48                 [     .     <     (     +     ! */
 266           0x87, 0xA4, 0x5B, 0x2E, 0x3C, 0x28, 0x2B, 0x21,
 267  /* 0x50     &                                      ---- */
 268           0x26, 0x82, 0x88, 0x89, 0x8A, 0xA1, 0x8C, 0x07,
 269  /* 0x58           ß     ]     $     *     )     ;     ^ */
 270           0x8D, 0xE1, 0x5D, 0x24, 0x2A, 0x29, 0x3B, 0x5E,
 271  /* 0x60     -     /  ----     Ä  ----  ----  ----       */
 272           0x2D, 0x2F, 0x07, 0x8E, 0x07, 0x07, 0x07, 0x8F,
 273  /* 0x68              ----     ,     %     _     >     ? */
 274           0x80, 0xA5, 0x07, 0x2C, 0x25, 0x5F, 0x3E, 0x3F,
 275  /* 0x70  ----        ----  ----  ----  ----  ----  ---- */
 276           0x07, 0x90, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
 277  /* 0x78     *     `     :     #     @     '     =     " */
 278           0x70, 0x60, 0x3A, 0x23, 0x40, 0x27, 0x3D, 0x22,
 279  /* 0x80     *     a     b     c     d     e     f     g */
 280           0x07, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67,
 281  /* 0x88     h     i              ----  ----  ----       */
 282           0x68, 0x69, 0xAE, 0xAF, 0x07, 0x07, 0x07, 0xF1,
 283  /* 0x90     °     j     k     l     m     n     o     p */
 284           0xF8, 0x6A, 0x6B, 0x6C, 0x6D, 0x6E, 0x6F, 0x70,
 285  /* 0x98     q     r                    ----        ---- */
 286           0x71, 0x72, 0xA6, 0xA7, 0x91, 0x07, 0x92, 0x07,
 287  /* 0xA0           ~     s     t     u     v     w     x */
 288           0xE6, 0x7E, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78,
 289  /* 0xA8     y     z              ----  ----  ----  ---- */
 290           0x79, 0x7A, 0xAD, 0xAB, 0x07, 0x07, 0x07, 0x07,
 291  /* 0xB0                          ----     §  ----       */
 292           0x9B, 0x9C, 0x9D, 0xFA, 0x07, 0x07, 0x07, 0xAC,
 293  /* 0xB8        ----           |  ----  ----  ----  ---- */
 294           0xAB, 0x07, 0xAA, 0x7C, 0x07, 0x07, 0x07, 0x07,
 295  /* 0xC0     {     A     B     C     D     E     F     G */
 296           0x7B, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47,
 297  /* 0xC8     H     I  ----           ö              ---- */
 298           0x48, 0x49, 0x07, 0x93, 0x94, 0x95, 0xA2, 0x07,
 299  /* 0xD0     }     J     K     L     M     N     O     P */
 300           0x7D, 0x4A, 0x4B, 0x4C, 0x4D, 0x4E, 0x4F, 0x50,
 301  /* 0xD8     Q     R  ----           ü                   */
 302           0x51, 0x52, 0x07, 0x96, 0x81, 0x97, 0xA3, 0x98,
 303  /* 0xE0     \           S     T     U     V     W     X */
 304           0x5C, 0xF6, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58,
 305  /* 0xE8     Y     Z        ----     Ö  ----  ----  ---- */
 306           0x59, 0x5A, 0xFD, 0x07, 0x99, 0x07, 0x07, 0x07,
 307  /* 0xF0     0     1     2     3     4     5     6     7 */
 308           0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
 309  /* 0xF8     8     9  ----  ----     Ü  ----  ----  ---- */
 310           0x38, 0x39, 0x07, 0x07, 0x9A, 0x07, 0x07, 0x07
 311 };
 312
 313
 314 /*
 315  * EBCDIC 037/500 conversion table:
 316  * from upper to lower case
 317  */
 318 __u8 _ebc_tolower[256] =
 319 {
 320         0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
 321         0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
 322         0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
 323         0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F,
 324         0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27,
 325         0x28, 0x29, 0x2A, 0x2B, 0x2C, 0x2D, 0x2E, 0x2F,
 326         0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
 327         0x38, 0x39, 0x3A, 0x3B, 0x3C, 0x3D, 0x3E, 0x3F,
 328         0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47,
 329         0x48, 0x49, 0x4A, 0x4B, 0x4C, 0x4D, 0x4E, 0x4F,
 330         0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57,
 331         0x58, 0x59, 0x5A, 0x5B, 0x5C, 0x5D, 0x5E, 0x5F,
 332         0x60, 0x61, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47,
 333         0x48, 0x49, 0x6A, 0x6B, 0x6C, 0x6D, 0x6E, 0x6F,
 334         0x70, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57,
 335         0x58, 0x79, 0x7A, 0x7B, 0x7C, 0x7D, 0x7E, 0x7F,
 336         0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,
 337         0x88, 0x89, 0x8A, 0x8B, 0x8C, 0x8D, 0x8E, 0x8F,
 338         0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97,
 339         0x98, 0x99, 0x9A, 0x9B, 0x9C, 0x9D, 0x9C, 0x9F,
 340         0xA0, 0xA1, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6, 0xA7,
 341         0xA8, 0xA9, 0xAA, 0xAB, 0x8C, 0x8D, 0x8E, 0xAF,
 342         0xB0, 0xB1, 0xB2, 0xB3, 0xB4, 0xB5, 0xB6, 0xB7,
 343         0xB8, 0xB9, 0xBA, 0xBB, 0xBC, 0xBD, 0xBE, 0xBF,
 344         0xC0, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,
 345         0x88, 0x89, 0xCA, 0xCB, 0xCC, 0xCD, 0xCE, 0xCF,
 346         0xD0, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97,
 347         0x98, 0x99, 0xDA, 0xDB, 0xDC, 0xDD, 0xDE, 0xDF,
 348         0xE0, 0xE1, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6, 0xA7,
 349         0xA8, 0xA9, 0xEA, 0xCB, 0xCC, 0xCD, 0xCE, 0xCF,
 350         0xF0, 0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0xF7,
 351         0xF8, 0xF9, 0xFA, 0xDB, 0xDC, 0xDD, 0xDE, 0xFF
 352 };
 353
 354
 355 /*
 356  * EBCDIC 037/500 conversion table:
 357  * from lower to upper case
 358  */
 359 __u8 _ebc_toupper[256] =
 360 {
 361         0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
 362         0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
 363         0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
 364         0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F,
 365         0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27,
 366         0x28, 0x29, 0x2A, 0x2B, 0x2C, 0x2D, 0x2E, 0x2F,
 367         0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
 368         0x38, 0x39, 0x3A, 0x3B, 0x3C, 0x3D, 0x3E, 0x3F,
 369         0x40, 0x41, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67,
 370         0x68, 0x69, 0x4A, 0x4B, 0x4C, 0x4D, 0x4E, 0x4F,
 371         0x50, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77,
 372         0x78, 0x59, 0x5A, 0x5B, 0x5C, 0x5D, 0x5E, 0x5F,
 373         0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67,
 374         0x68, 0x69, 0x6A, 0x6B, 0x6C, 0x6D, 0x6E, 0x6F,
 375         0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77,
 376         0x78, 0x79, 0x7A, 0x7B, 0x7C, 0x7D, 0x7E, 0x7F,
 377         0x80, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7,
 378         0xC8, 0xC9, 0x8A, 0x8B, 0xAC, 0xAD, 0xAE, 0x8F,
 379         0x90, 0xD1, 0xD2, 0xD3, 0xD4, 0xD5, 0xD6, 0xD7,
 380         0xD8, 0xD9, 0x9A, 0x9B, 0x9E, 0x9D, 0x9E, 0x9F,
 381         0xA0, 0xA1, 0xE2, 0xE3, 0xE4, 0xE5, 0xE6, 0xE7,
 382         0xE8, 0xE9, 0xAA, 0xAB, 0xAC, 0xAD, 0xAE, 0xAF,
 383         0xB0, 0xB1, 0xB2, 0xB3, 0xB4, 0xB5, 0xB6, 0xB7,
 384         0xB8, 0xB9, 0xBA, 0xBB, 0xBC, 0xBD, 0xBE, 0xBF,
 385         0xC0, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7,
 386         0xC8, 0xC9, 0xCA, 0xEB, 0xEC, 0xED, 0xEE, 0xEF,
 387         0xD0, 0xD1, 0xD2, 0xD3, 0xD4, 0xD5, 0xD6, 0xD7,
 388         0xD8, 0xD9, 0xDA, 0xFB, 0xFC, 0xFD, 0xFE, 0xDF,
 389         0xE0, 0xE1, 0xE2, 0xE3, 0xE4, 0xE5, 0xE6, 0xE7,
 390         0xE8, 0xE9, 0xEA, 0xEB, 0xEC, 0xED, 0xEE, 0xEF,
 391         0xF0, 0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0xF7,
 392         0xF8, 0xF9, 0xFA, 0xFB, 0xFC, 0xFD, 0xFE, 0xFF
 393 };
 394
 395 EXPORT_SYMBOL(_ascebc_500);
 396 EXPORT_SYMBOL(_ebcasc_500);
 397 EXPORT_SYMBOL(_ascebc);
 398 EXPORT_SYMBOL(_ebcasc);
 399 EXPORT_SYMBOL(_ebc_tolower);
 400 EXPORT_SYMBOL(_ebc_toupper);
 401