src/libs/cp866/cp866.c

   1 #include "cp866.h"
   2
   3 int cp866_isalpha (int ch) {
   4   return (ch >= 0x41 && ch <= 0x5A) || (ch >= 0x61 && ch <= 0x7A) || (ch >= 0x80 && ch <= 0xAF) || (ch >= 0xE0 && ch <= 0xF7);
   5 }
   6
   7 int cp866_isupper (int ch) {
   8   return (ch >= 0x41 && ch <= 0x5A) || (ch >= 0x80 && ch <= 0x9F) || ch == 0xF0 || ch == 0xF2 || ch == 0xF4 || ch == 0xF6;
   9 }
  10
  11 int cp866_islower (int ch) {
  12   return (ch >= 0x61 && ch <= 0x7A) || (ch >= 0xA0 && ch <= 0xAF) || (ch >= 0xE0 && ch <= 0xEF) || ch == 0xF1 || ch == 0xF3 || ch == 0xF5 || ch == 0xF7;
  13 }
  14
  15 int cp866_toupper (int ch) {
  16   if (ch >= 0x61 && ch <= 0x7A) {
  17     return ch - 0x61 + 0x41;
  18   } else if (ch >= 0xA0 && ch <= 0xAF) {
  19     return ch - 0xA0 + 0x80;
  20   } else if (ch >= 0xE0 && ch <= 0xEF) {
  21     return ch - 0xE0 + 0x90;
  22   } else {
  23     switch (ch) {
  24       case 0xF1:
  25       case 0xF3:
  26       case 0xF5:
  27       case 0xF7:
  28         return ch - 1;
  29       default:
  30         return ch;
  31     }
  32   }
  33 }
  34
  35 int cp866_tolower (int ch) {
  36   if (ch >= 0x41 && ch <= 0x5A) {
  37     return ch - 0x41 + 0x61;
  38   } else if (ch >= 0x80 && ch <= 0x8F) {
  39     return ch - 0x80 + 0xA0;
  40   } else if (ch >= 0x90 && ch <= 0x9F) {
  41     return ch - 0x90 + 0xE0;
  42   } else {
  43     switch (ch) {
  44       case 0xF0:
  45       case 0xF2:
  46       case 0xF4:
  47       case 0xF6:
  48         return ch + 1;
  49       default:
  50         return ch;
  51     }
  52   }
  53 }
  54
  55 int cp866_strcasecmp (const char *a, const char *b) {
  56   const char *aa = a;
  57   const char *bb = b;
  58   while (*aa != 0 && cp866_tolower(*aa) == cp866_tolower(*bb)) {
  59     aa++;
  60     bb++;
  61   }
  62   return *(const unsigned char *)aa - *(const unsigned char *)bb;
  63 }
  64
  65 int cp866_strncasecmp (const char *a, const char *b, unsigned int n) {
  66   const char *aa = a;
  67   const char *bb = b;
  68   unsigned int i = n;
  69   while (i > 0 && *aa != 0 && cp866_tolower(*aa) == cp866_tolower(*bb)) {
  70     i--;
  71     aa++;
  72     bb++;
  73   }
  74   return i == 0 ? 0 : *(const unsigned char *)aa - *(const unsigned char *)bb;
  75 }
  76
  77 int cp866_ctou (int ch) {
  78   switch (ch) {
  79     case 0xB0: return 0x2591;
  80     case 0xB1: return 0x2592;
  81     case 0xB2: return 0x2593;
  82     case 0xB3: return 0x2502;
  83     case 0xB4: return 0x2524;
  84     case 0xB5: return 0x2561;
  85     case 0xB6: return 0x2562;
  86     case 0xB7: return 0x2556;
  87     case 0xB8: return 0x2555;
  88     case 0xB9: return 0x2563;
  89     case 0xBA: return 0x2551;
  90     case 0xBB: return 0x2557;
  91     case 0xBC: return 0x255D;
  92     case 0xBD: return 0x255C;
  93     case 0xBE: return 0x255B;
  94     case 0xBF: return 0x2510;
  95     case 0xC0: return 0x2514;
  96     case 0xC1: return 0x2534;
  97     case 0xC2: return 0x252C;
  98     case 0xC3: return 0x251C;
  99     case 0xC4: return 0x2500;
 100     case 0xC5: return 0x253C;
 101     case 0xC6: return 0x255E;
 102     case 0xC7: return 0x255F;
 103     case 0xC8: return 0x255A;
 104     case 0xC9: return 0x2554;
 105     case 0xCA: return 0x2569;
 106     case 0xCB: return 0x2566;
 107     case 0xCC: return 0x2560;
 108     case 0xCD: return 0x2550;
 109     case 0xCE: return 0x256C;
 110     case 0xCF: return 0x2567;
 111     case 0xD0: return 0x2568;
 112     case 0xD1: return 0x2564;
 113     case 0xD2: return 0x2565;
 114     case 0xD3: return 0x2559;
 115     case 0xD4: return 0x2558;
 116     case 0xD5: return 0x2552;
 117     case 0xD6: return 0x2553;
 118     case 0xD7: return 0x256B;
 119     case 0xD8: return 0x256A;
 120     case 0xD9: return 0x2518;
 121     case 0xDA: return 0x250C;
 122     case 0xDB: return 0x2588;
 123     case 0xDC: return 0x2584;
 124     case 0xDD: return 0x258C;
 125     case 0xDE: return 0x2590;
 126     case 0xDF: return 0x2580;
 127     case 0xF0: return 0x0401;
 128     case 0xF1: return 0x0451;
 129     case 0xF2: return 0x0404;
 130     case 0xF3: return 0x0454;
 131     case 0xF4: return 0x0407;
 132     case 0xF5: return 0x0457;
 133     case 0xF6: return 0x040E;
 134     case 0xF7: return 0x045E;
 135     case 0xF8: return 0x00B0;
 136     case 0xF9: return 0x2219;
 137     case 0xFA: return 0x00B7;
 138     case 0xFB: return 0x221A;
 139     case 0xFC: return 0x2116;
 140     case 0xFD: return 0x00A4;
 141     case 0xFE: return 0x25A0;
 142     case 0xFF: return 0x00A0;
 143     default:
 144       if (ch >= 0x20 && ch <= 0x7E) {
 145         return ch;
 146       } else if (ch >= 0x80 && ch <= 0xAF) {
 147         return ch - 0x80 + 0x410;
 148       } else if (ch >= 0xE0 && ch <= 0xEF) {
 149         return ch - 0xE0 + 0x440;
 150       } else {
 151         return ch;
 152       }
 153   }
 154 }
 155
 156 int cp866_ctoug (int ch) {
 157   switch (ch) {
 158     case 0x00: return 0x0000;
 159     case 0x01: return 0x263A;
 160     case 0x02: return 0x263B;
 161     case 0x03: return 0x2665;
 162     case 0x04: return 0x2666;
 163     case 0x05: return 0x2663;
 164     case 0x06: return 0x2660;
 165     case 0x07: return 0x2022;
 166     case 0x08: return 0x25D8;
 167     case 0x09: return 0x25CB;
 168     case 0x0A: return 0x25D9;
 169     case 0x0B: return 0x2642;
 170     case 0x0C: return 0x2640;
 171     case 0x0D: return 0x266A;
 172     case 0x0E: return 0x266B;
 173     case 0x0F: return 0x263C;
 174     case 0x10: return 0x25BA;
 175     case 0x11: return 0x25C4;
 176     case 0x12: return 0x2195;
 177     case 0x13: return 0x203C;
 178     case 0x14: return 0x00B6;
 179     case 0x15: return 0x00A7;
 180     case 0x16: return 0x25AC;
 181     case 0x17: return 0x21A8;
 182     case 0x18: return 0x2191;
 183     case 0x19: return 0x2193;
 184     case 0x1A: return 0x2192;
 185     case 0x1B: return 0x2190;
 186     case 0x1C: return 0x221F;
 187     case 0x1D: return 0x2194;
 188     case 0x1E: return 0x25B2;
 189     case 0x1F: return 0x25BC;
 190     case 0x7F: return 0x2302;
 191     default: return cp866_ctou(ch);
 192   }
 193 }
 194
 195 int cp866_utoc (int ch) {
 196   if (ch >= 0x00 && ch <= 0x7F) {
 197     return ch;
 198   } else {
 199     switch (ch) {
 200       case 0x263A: return 0x01;
 201       case 0x263B: return 0x02;
 202       case 0x2665: return 0x03;
 203       case 0x2666: return 0x04;
 204       case 0x2663: return 0x05;
 205       case 0x2660: return 0x06;
 206       case 0x2022: return 0x07;
 207       case 0x25D8: return 0x08;
 208       case 0x25CB: return 0x09;
 209       case 0x25D9: return 0x0A;
 210       case 0x2642: return 0x0B;
 211       case 0x2640: return 0x0C;
 212       case 0x266A: return 0x0D;
 213       case 0x266B: return 0x0E;
 214       case 0x263C: return 0x0F;
 215       case 0x25BA: return 0x10;
 216       case 0x25C4: return 0x11;
 217       case 0x2195: return 0x12;
 218       case 0x203C: return 0x13;
 219       case 0x00B6: return 0x14;
 220       case 0x00A7: return 0x15;
 221       case 0x25AC: return 0x16;
 222       case 0x21A8: return 0x17;
 223       case 0x2191: return 0x18;
 224       case 0x2193: return 0x19;
 225       case 0x2192: return 0x1A;
 226       case 0x2190: return 0x1B;
 227       case 0x221F: return 0x1C;
 228       case 0x2194: return 0x1D;
 229       case 0x25B2: return 0x1E;
 230       case 0x25BC: return 0x1F;
 231       case 0x2302: return 0x7F;
 232       case 0x2591: return 0xB0;
 233       case 0x2592: return 0xB1;
 234       case 0x2593: return 0xB2;
 235       case 0x2502: return 0xB3;
 236       case 0x2524: return 0xB4;
 237       case 0x2561: return 0xB5;
 238       case 0x2562: return 0xB6;
 239       case 0x2556: return 0xB7;
 240       case 0x2555: return 0xB8;
 241       case 0x2563: return 0xB9;
 242       case 0x2551: return 0xBA;
 243       case 0x2557: return 0xBB;
 244       case 0x255D: return 0xBC;
 245       case 0x255C: return 0xBD;
 246       case 0x255B: return 0xBE;
 247       case 0x2510: return 0xBF;
 248       case 0x2514: return 0xC0;
 249       case 0x2534: return 0xC1;
 250       case 0x252C: return 0xC2;
 251       case 0x251C: return 0xC3;
 252       case 0x2500: return 0xC4;
 253       case 0x253C: return 0xC5;
 254       case 0x255E: return 0xC6;
 255       case 0x255F: return 0xC7;
 256       case 0x255A: return 0xC8;
 257       case 0x2554: return 0xC9;
 258       case 0x2569: return 0xCA;
 259       case 0x2566: return 0xCB;
 260       case 0x2560: return 0xCC;
 261       case 0x2550: return 0xCD;
 262       case 0x256C: return 0xCE;
 263       case 0x2567: return 0xCF;
 264       case 0x2568: return 0xD0;
 265       case 0x2564: return 0xD1;
 266       case 0x2565: return 0xD2;
 267       case 0x2559: return 0xD3;
 268       case 0x2558: return 0xD4;
 269       case 0x2552: return 0xD5;
 270       case 0x2553: return 0xD6;
 271       case 0x256B: return 0xD7;
 272       case 0x256A: return 0xD8;
 273       case 0x2518: return 0xD9;
 274       case 0x250C: return 0xDA;
 275       case 0x2588: return 0xDB;
 276       case 0x2584: return 0xDC;
 277       case 0x258C: return 0xDD;
 278       case 0x2590: return 0xDE;
 279       case 0x2580: return 0xDF;
 280       case 0x0401: return 0xF0;
 281       case 0x0451: return 0xF1;
 282       case 0x0404: return 0xF2;
 283       case 0x0454: return 0xF3;
 284       case 0x0407: return 0xF4;
 285       case 0x0457: return 0xF5;
 286       case 0x040E: return 0xF6;
 287       case 0x045E: return 0xF7;
 288       case 0x00B0: return 0xF8;
 289       case 0x2219: return 0xF9;
 290       case 0x00B7: return 0xFA;
 291       case 0x221A: return 0xFB;
 292       case 0x2116: return 0xFC;
 293       case 0x00A4: return 0xFD;
 294       case 0x25A0: return 0xFE;
 295       case 0x00A0: return 0xFF;
 296       default:
 297         if (ch >= 0x410 && ch <= 0x43F) {
 298           return ch - 0x410 + 0x80;
 299         } else if (ch >= 0x440 && ch <= 0x44F) {
 300           return ch - 0x440 + 0xE0;
 301         } else {
 302           return -1;
 303         }
 304     }
 305   }
 306 }