| 1 | |
| 2 | /* |
| 3 | ** Copyright 2000-2006 Double Precision, Inc. |
| 4 | ** See COPYING for distribution information. |
| 5 | ** |
| 6 | ** $Id: ibm775.c,v 1.6 2006/03/25 14:24:43 mrsam Exp $ |
| 7 | */ |
| 8 | |
| 9 | #include "unicode.h" |
| 10 | static const unicode_char ibm775_unicode [128]={ |
| 11 | 262,252,233,257,228,291,229,263,322,275,342,343,299,377,196,197, |
| 12 | 201,230,198,333,246,290,162,346,347,214,220,248,163,216,215,164, |
| 13 | 256,298,243,379,380,378,8221,166,169,174,172,189,188,321,171,187, |
| 14 | 9617,9618,9619,9474,9508,260,268,280,278,9571,9553,9559,9565,302,352,9488, |
| 15 | 9492,9524,9516,9500,9472,9532,370,362,9562,9556,9577,9574,9568,9552,9580,381, |
| 16 | 261,269,281,279,303,353,371,363,382,9496,9484,9608,9604,9612,9616,9600, |
| 17 | 211,223,332,323,245,213,181,324,310,311,315,316,326,274,325,8217, |
| 18 | 173,177,8220,190,182,167,247,8222,176,8729,183,185,179,178,9632,160 |
| 19 | }; |
| 20 | static const char ibm775_uc [256]={ |
| 21 | (char)0x00,(char)0x01,(char)0x02,(char)0x03,(char)0x04,(char)0x05,(char)0x06,(char)0x07, |
| 22 | (char)0x08,(char)0x09,(char)0x0a,(char)0x0b,(char)0x0c,(char)0x0d,(char)0x0e,(char)0x0f, |
| 23 | (char)0x10,(char)0x11,(char)0x12,(char)0x13,(char)0x14,(char)0x15,(char)0x16,(char)0x17, |
| 24 | (char)0x18,(char)0x19,(char)0x1a,(char)0x1b,(char)0x1c,(char)0x1d,(char)0x1e,(char)0x1f, |
| 25 | (char)0x20,(char)0x21,(char)0x22,(char)0x23,(char)0x24,(char)0x25,(char)0x26,(char)0x27, |
| 26 | (char)0x28,(char)0x29,(char)0x2a,(char)0x2b,(char)0x2c,(char)0x2d,(char)0x2e,(char)0x2f, |
| 27 | (char)0x30,(char)0x31,(char)0x32,(char)0x33,(char)0x34,(char)0x35,(char)0x36,(char)0x37, |
| 28 | (char)0x38,(char)0x39,(char)0x3a,(char)0x3b,(char)0x3c,(char)0x3d,(char)0x3e,(char)0x3f, |
| 29 | (char)0x40,(char)0x41,(char)0x42,(char)0x43,(char)0x44,(char)0x45,(char)0x46,(char)0x47, |
| 30 | (char)0x48,(char)0x49,(char)0x4a,(char)0x4b,(char)0x4c,(char)0x4d,(char)0x4e,(char)0x4f, |
| 31 | (char)0x50,(char)0x51,(char)0x52,(char)0x53,(char)0x54,(char)0x55,(char)0x56,(char)0x57, |
| 32 | (char)0x58,(char)0x59,(char)0x5a,(char)0x5b,(char)0x5c,(char)0x5d,(char)0x5e,(char)0x5f, |
| 33 | (char)0x60,(char)0x41,(char)0x42,(char)0x43,(char)0x44,(char)0x45,(char)0x46,(char)0x47, |
| 34 | (char)0x48,(char)0x49,(char)0x4a,(char)0x4b,(char)0x4c,(char)0x4d,(char)0x4e,(char)0x4f, |
| 35 | (char)0x50,(char)0x51,(char)0x52,(char)0x53,(char)0x54,(char)0x55,(char)0x56,(char)0x57, |
| 36 | (char)0x58,(char)0x59,(char)0x5a,(char)0x7b,(char)0x7c,(char)0x7d,(char)0x7e,(char)0x7f, |
| 37 | (char)0x80,(char)0x9a,(char)0x90,(char)0xa0,(char)0x8e,(char)0x95,(char)0x8f,(char)0x80, |
| 38 | (char)0xad,(char)0xed,(char)0x8a,(char)0x8a,(char)0xa1,(char)0x8d,(char)0x8e,(char)0x8f, |
| 39 | (char)0x90,(char)0x92,(char)0x92,(char)0xe2,(char)0x99,(char)0x95,(char)0x96,(char)0x97, |
| 40 | (char)0x97,(char)0x99,(char)0x9a,(char)0x9d,(char)0x9c,(char)0x9d,(char)0x9e,(char)0x9f, |
| 41 | (char)0xa0,(char)0xa1,(char)0xe0,(char)0xa3,(char)0xa3,(char)0x8d,(char)0xa6,(char)0xa7, |
| 42 | (char)0xa8,(char)0xa9,(char)0xaa,(char)0xab,(char)0xac,(char)0xad,(char)0xae,(char)0xaf, |
| 43 | (char)0xb0,(char)0xb1,(char)0xb2,(char)0xb3,(char)0xb4,(char)0xb5,(char)0xb6,(char)0xb7, |
| 44 | (char)0xb8,(char)0xb9,(char)0xba,(char)0xbb,(char)0xbc,(char)0xbd,(char)0xbe,(char)0xbf, |
| 45 | (char)0xc0,(char)0xc1,(char)0xc2,(char)0xc3,(char)0xc4,(char)0xc5,(char)0xc6,(char)0xc7, |
| 46 | (char)0xc8,(char)0xc9,(char)0xca,(char)0xcb,(char)0xcc,(char)0xcd,(char)0xce,(char)0xcf, |
| 47 | (char)0xb5,(char)0xb6,(char)0xb7,(char)0xb8,(char)0xbd,(char)0xbe,(char)0xc6,(char)0xc7, |
| 48 | (char)0xcf,(char)0xd9,(char)0xda,(char)0xdb,(char)0xdc,(char)0xdd,(char)0xde,(char)0xdf, |
| 49 | (char)0xe0,(char)0xe1,(char)0xe2,(char)0xe3,(char)0xe5,(char)0xe5,(char)0xe6,(char)0xe3, |
| 50 | (char)0xe8,(char)0xe8,(char)0xea,(char)0xea,(char)0xee,(char)0xed,(char)0xee,(char)0xef, |
| 51 | (char)0xf0,(char)0xf1,(char)0xf2,(char)0xf3,(char)0xf4,(char)0xf5,(char)0xf6,(char)0xf7, |
| 52 | (char)0xf8,(char)0xf9,(char)0xfa,(char)0xfb,(char)0xfc,(char)0xfd,(char)0xfe,(char)0xff |
| 53 | }; |
| 54 | static const char ibm775_lc [256]={ |
| 55 | (char)0x00,(char)0x01,(char)0x02,(char)0x03,(char)0x04,(char)0x05,(char)0x06,(char)0x07, |
| 56 | (char)0x08,(char)0x09,(char)0x0a,(char)0x0b,(char)0x0c,(char)0x0d,(char)0x0e,(char)0x0f, |
| 57 | (char)0x10,(char)0x11,(char)0x12,(char)0x13,(char)0x14,(char)0x15,(char)0x16,(char)0x17, |
| 58 | (char)0x18,(char)0x19,(char)0x1a,(char)0x1b,(char)0x1c,(char)0x1d,(char)0x1e,(char)0x1f, |
| 59 | (char)0x20,(char)0x21,(char)0x22,(char)0x23,(char)0x24,(char)0x25,(char)0x26,(char)0x27, |
| 60 | (char)0x28,(char)0x29,(char)0x2a,(char)0x2b,(char)0x2c,(char)0x2d,(char)0x2e,(char)0x2f, |
| 61 | (char)0x30,(char)0x31,(char)0x32,(char)0x33,(char)0x34,(char)0x35,(char)0x36,(char)0x37, |
| 62 | (char)0x38,(char)0x39,(char)0x3a,(char)0x3b,(char)0x3c,(char)0x3d,(char)0x3e,(char)0x3f, |
| 63 | (char)0x40,(char)0x61,(char)0x62,(char)0x63,(char)0x64,(char)0x65,(char)0x66,(char)0x67, |
| 64 | (char)0x68,(char)0x69,(char)0x6a,(char)0x6b,(char)0x6c,(char)0x6d,(char)0x6e,(char)0x6f, |
| 65 | (char)0x70,(char)0x71,(char)0x72,(char)0x73,(char)0x74,(char)0x75,(char)0x76,(char)0x77, |
| 66 | (char)0x78,(char)0x79,(char)0x7a,(char)0x5b,(char)0x5c,(char)0x5d,(char)0x5e,(char)0x5f, |
| 67 | (char)0x60,(char)0x61,(char)0x62,(char)0x63,(char)0x64,(char)0x65,(char)0x66,(char)0x67, |
| 68 | (char)0x68,(char)0x69,(char)0x6a,(char)0x6b,(char)0x6c,(char)0x6d,(char)0x6e,(char)0x6f, |
| 69 | (char)0x70,(char)0x71,(char)0x72,(char)0x73,(char)0x74,(char)0x75,(char)0x76,(char)0x77, |
| 70 | (char)0x78,(char)0x79,(char)0x7a,(char)0x7b,(char)0x7c,(char)0x7d,(char)0x7e,(char)0x7f, |
| 71 | (char)0x87,(char)0x81,(char)0x82,(char)0x83,(char)0x84,(char)0x85,(char)0x86,(char)0x87, |
| 72 | (char)0x88,(char)0x89,(char)0x8b,(char)0x8b,(char)0x8c,(char)0xa5,(char)0x84,(char)0x86, |
| 73 | (char)0x82,(char)0x91,(char)0x91,(char)0x93,(char)0x94,(char)0x85,(char)0x96,(char)0x98, |
| 74 | (char)0x98,(char)0x94,(char)0x81,(char)0x9b,(char)0x9c,(char)0x9b,(char)0x9e,(char)0x9f, |
| 75 | (char)0x83,(char)0x8c,(char)0xa2,(char)0xa4,(char)0xa4,(char)0xa5,(char)0xa6,(char)0xa7, |
| 76 | (char)0xa8,(char)0xa9,(char)0xaa,(char)0xab,(char)0xac,(char)0x88,(char)0xae,(char)0xaf, |
| 77 | (char)0xb0,(char)0xb1,(char)0xb2,(char)0xb3,(char)0xb4,(char)0xd0,(char)0xd1,(char)0xd2, |
| 78 | (char)0xd3,(char)0xb9,(char)0xba,(char)0xbb,(char)0xbc,(char)0xd4,(char)0xd5,(char)0xbf, |
| 79 | (char)0xc0,(char)0xc1,(char)0xc2,(char)0xc3,(char)0xc4,(char)0xc5,(char)0xd6,(char)0xd7, |
| 80 | (char)0xc8,(char)0xc9,(char)0xca,(char)0xcb,(char)0xcc,(char)0xcd,(char)0xce,(char)0xd8, |
| 81 | (char)0xd0,(char)0xd1,(char)0xd2,(char)0xd3,(char)0xd4,(char)0xd5,(char)0xd6,(char)0xd7, |
| 82 | (char)0xd8,(char)0xd9,(char)0xda,(char)0xdb,(char)0xdc,(char)0xdd,(char)0xde,(char)0xdf, |
| 83 | (char)0xa2,(char)0xe1,(char)0x93,(char)0xe7,(char)0xe4,(char)0xe4,(char)0xe6,(char)0xe7, |
| 84 | (char)0xe9,(char)0xe9,(char)0xeb,(char)0xeb,(char)0xec,(char)0x89,(char)0xec,(char)0xef, |
| 85 | (char)0xf0,(char)0xf1,(char)0xf2,(char)0xf3,(char)0xf4,(char)0xf5,(char)0xf6,(char)0xf7, |
| 86 | (char)0xf8,(char)0xf9,(char)0xfa,(char)0xfb,(char)0xfc,(char)0xfd,(char)0xfe,(char)0xff |
| 87 | }; |
| 88 | static const char ibm775_tc [256]={ |
| 89 | (char)0x00,(char)0x01,(char)0x02,(char)0x03,(char)0x04,(char)0x05,(char)0x06,(char)0x07, |
| 90 | (char)0x08,(char)0x09,(char)0x0a,(char)0x0b,(char)0x0c,(char)0x0d,(char)0x0e,(char)0x0f, |
| 91 | (char)0x10,(char)0x11,(char)0x12,(char)0x13,(char)0x14,(char)0x15,(char)0x16,(char)0x17, |
| 92 | (char)0x18,(char)0x19,(char)0x1a,(char)0x1b,(char)0x1c,(char)0x1d,(char)0x1e,(char)0x1f, |
| 93 | (char)0x20,(char)0x21,(char)0x22,(char)0x23,(char)0x24,(char)0x25,(char)0x26,(char)0x27, |
| 94 | (char)0x28,(char)0x29,(char)0x2a,(char)0x2b,(char)0x2c,(char)0x2d,(char)0x2e,(char)0x2f, |
| 95 | (char)0x30,(char)0x31,(char)0x32,(char)0x33,(char)0x34,(char)0x35,(char)0x36,(char)0x37, |
| 96 | (char)0x38,(char)0x39,(char)0x3a,(char)0x3b,(char)0x3c,(char)0x3d,(char)0x3e,(char)0x3f, |
| 97 | (char)0x40,(char)0x41,(char)0x42,(char)0x43,(char)0x44,(char)0x45,(char)0x46,(char)0x47, |
| 98 | (char)0x48,(char)0x49,(char)0x4a,(char)0x4b,(char)0x4c,(char)0x4d,(char)0x4e,(char)0x4f, |
| 99 | (char)0x50,(char)0x51,(char)0x52,(char)0x53,(char)0x54,(char)0x55,(char)0x56,(char)0x57, |
| 100 | (char)0x58,(char)0x59,(char)0x5a,(char)0x5b,(char)0x5c,(char)0x5d,(char)0x5e,(char)0x5f, |
| 101 | (char)0x60,(char)0x41,(char)0x42,(char)0x43,(char)0x44,(char)0x45,(char)0x46,(char)0x47, |
| 102 | (char)0x48,(char)0x49,(char)0x4a,(char)0x4b,(char)0x4c,(char)0x4d,(char)0x4e,(char)0x4f, |
| 103 | (char)0x50,(char)0x51,(char)0x52,(char)0x53,(char)0x54,(char)0x55,(char)0x56,(char)0x57, |
| 104 | (char)0x58,(char)0x59,(char)0x5a,(char)0x7b,(char)0x7c,(char)0x7d,(char)0x7e,(char)0x7f, |
| 105 | (char)0x80,(char)0x9a,(char)0x90,(char)0xa0,(char)0x8e,(char)0x95,(char)0x8f,(char)0x80, |
| 106 | (char)0xad,(char)0xed,(char)0x8a,(char)0x8a,(char)0xa1,(char)0x8d,(char)0x8e,(char)0x8f, |
| 107 | (char)0x90,(char)0x92,(char)0x92,(char)0xe2,(char)0x99,(char)0x95,(char)0x96,(char)0x97, |
| 108 | (char)0x97,(char)0x99,(char)0x9a,(char)0x9d,(char)0x9c,(char)0x9d,(char)0x9e,(char)0x9f, |
| 109 | (char)0xa0,(char)0xa1,(char)0xe0,(char)0xa3,(char)0xa3,(char)0x8d,(char)0xa6,(char)0xa7, |
| 110 | (char)0xa8,(char)0xa9,(char)0xaa,(char)0xab,(char)0xac,(char)0xad,(char)0xae,(char)0xaf, |
| 111 | (char)0xb0,(char)0xb1,(char)0xb2,(char)0xb3,(char)0xb4,(char)0xb5,(char)0xb6,(char)0xb7, |
| 112 | (char)0xb8,(char)0xb9,(char)0xba,(char)0xbb,(char)0xbc,(char)0xbd,(char)0xbe,(char)0xbf, |
| 113 | (char)0xc0,(char)0xc1,(char)0xc2,(char)0xc3,(char)0xc4,(char)0xc5,(char)0xc6,(char)0xc7, |
| 114 | (char)0xc8,(char)0xc9,(char)0xca,(char)0xcb,(char)0xcc,(char)0xcd,(char)0xce,(char)0xcf, |
| 115 | (char)0xb5,(char)0xb6,(char)0xb7,(char)0xb8,(char)0xbd,(char)0xbe,(char)0xc6,(char)0xc7, |
| 116 | (char)0xcf,(char)0xd9,(char)0xda,(char)0xdb,(char)0xdc,(char)0xdd,(char)0xde,(char)0xdf, |
| 117 | (char)0xe0,(char)0xe1,(char)0xe2,(char)0xe3,(char)0xe5,(char)0xe5,(char)0xe6,(char)0xe3, |
| 118 | (char)0xe8,(char)0xe8,(char)0xea,(char)0xea,(char)0xee,(char)0xed,(char)0xee,(char)0xef, |
| 119 | (char)0xf0,(char)0xf1,(char)0xf2,(char)0xf3,(char)0xf4,(char)0xf5,(char)0xf6,(char)0xf7, |
| 120 | (char)0xf8,(char)0xf9,(char)0xfa,(char)0xfb,(char)0xfc,(char)0xfd,(char)0xfe,(char)0xff |
| 121 | }; |
| 122 | |
| 123 | |
| 124 | static unicode_char *c2u(const struct unicode_info *u, const char *cp, int *ip) |
| 125 | { |
| 126 | return (unicode_iso8859_c2u(cp, ip, ibm775_unicode)); |
| 127 | } |
| 128 | |
| 129 | static char *u2c(const struct unicode_info *u, const unicode_char *cp, int *ip) |
| 130 | { |
| 131 | return (unicode_iso8859_u2c(cp, ip, ibm775_unicode)); |
| 132 | } |
| 133 | |
| 134 | static char *toupper_func(const struct unicode_info *u, const char *cp, int *ip) |
| 135 | { |
| 136 | return (unicode_iso8859_convert(cp, ip, ibm775_uc)); |
| 137 | } |
| 138 | |
| 139 | static char *tolower_func(const struct unicode_info *u, const char *cp, int *ip) |
| 140 | { |
| 141 | return (unicode_iso8859_convert(cp, ip, ibm775_lc)); |
| 142 | } |
| 143 | |
| 144 | static char *totitle_func(const struct unicode_info *u, const char *cp, int *ip) |
| 145 | { |
| 146 | return (unicode_iso8859_convert(cp, ip, ibm775_tc)); |
| 147 | } |
| 148 | |
| 149 | const struct unicode_info unicode_IBM_775 = { |
| 150 | "IBM775", |
| 151 | UNICODE_USASCII, |
| 152 | c2u, |
| 153 | u2c, |
| 154 | toupper_func, |
| 155 | tolower_func, |
| 156 | totitle_func}; |