src/libs/cp866/cp866.c

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