src/encoding.C

   1 /* This file is part of
   2  * ======================================================
   3  *
   4  *           LyX, The Document Processor
   5  *
   6  *           Copyright 1995 Matthias Ettrich
   7  *           Copyright 1995-2001 The LyX Team.
   8  *
   9  * ====================================================== */
  10
  11 #include <config.h>
  12
  13 #ifdef __GNUG__
  14 #pragma implementation
  15 #endif
  16
  17 #include "encoding.h"
  18 #include "lyxlex.h"
  19 #include "debug.h"
  20
  21 #ifndef CXX_GLOBAL_CSTD
  22 using std::strtol;
  23 #endif
  24
  25 using std::endl;
  26
  27 Encodings encodings;
  28
  29 namespace {
  30
  31 Uchar tab_iso8859_1[256] = {
  32    0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f,
  33    0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f,
  34    0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f,
  35    0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f,
  36    0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f,
  37    0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, 0x5b, 0x5c, 0x5d, 0x5e, 0x5f,
  38    0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f,
  39    0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79, 0x7a, 0x7b, 0x7c, 0x7d, 0x7e, 0x7f,
  40    0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x8d, 0x8e, 0x8f,
  41    0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98, 0x99, 0x9a, 0x9b, 0x9c, 0x9d, 0x9e, 0x9f,
  42    0xa0, 0xa1, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa7, 0xa8, 0xa9, 0xaa, 0xab, 0xac, 0xad, 0xae, 0xaf,
  43    0xb0, 0xb1, 0xb2, 0xb3, 0xb4, 0xb5, 0xb6, 0xb7, 0xb8, 0xb9, 0xba, 0xbb, 0xbc, 0xbd, 0xbe, 0xbf,
  44    0xc0, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, 0xc8, 0xc9, 0xca, 0xcb, 0xcc, 0xcd, 0xce, 0xcf,
  45    0xd0, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7, 0xd8, 0xd9, 0xda, 0xdb, 0xdc, 0xdd, 0xde, 0xdf,
  46    0xe0, 0xe1, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9, 0xea, 0xeb, 0xec, 0xed, 0xee, 0xef,
  47    0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8, 0xf9, 0xfa, 0xfb, 0xfc, 0xfd, 0xfe, 0xff
  48 };
  49
  50 #ifdef USE_UNICODE_FOR_SYMBOLS
  51 Uchar tab_symbol[256] = {
  52    0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f,
  53    0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f,
  54
  55    0x0020, 0x0021, 0x2200, 0x0023, 0x2203, 0x0025, 0x0026, 0x220b,
  56    0x0028, 0x0029, 0x002a, 0x002b, 0x002c, 0x002d, 0x002e, 0x002f,
  57
  58    0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f,
  59
  60 //   0x2245, 0x0391, 0x0392, 0x03a7, 0x0394, 0x0395, 0x03a6, 0x0393,
  61 //   0x0397, 0x0399, 0x03d1, 0x039a, 0x039b, 0x039c, 0x039d, 0x039f,
  62
  63 //   0x03a0, 0x0398, 0x03a1, 0x03a3, 0x03a4, 0x03a5, 0x03c2, 0x03a9,
  64 //   0x039e, 0x03a8, 0x0396, 0x005b, 0x2234, 0x005d, 0x22a5, 0xffff,
  65    0x2245, 0x0041, 0x0042, 0x0058, 0x0394, 0x0045, 0x03c2, 0x03a9,
  66    0x0048, 0x0049, 0x03d1, 0x004b, 0x039b, 0x004d, 0x004e, 0x004f,
  67
  68    0x03a0, 0x0398, 0x0050, 0x03a3, 0x0054, 0x0059, 0x03c2, 0x03a9,
  69    0x039e, 0x03a8, 0x005a, 0x005b, 0x2234, 0x005d, 0x22a5, 0xffff,
  70
  71    0xffff, 0x03b1, 0x03b2, 0x03c7, 0x03b4, 0x03b5, 0x03d5, 0x03b3,
  72    0x03b7, 0x03b9, 0x03c6, 0x03ba, 0x03bb, 0x03bc, 0x03bd, 0x03bf,
  73
  74    0x03c0, 0x03b8, 0x03c1, 0x03c3, 0x03c4, 0x03c5, 0x03d6, 0x03c9,
  75    0x03be, 0x03c8, 0x03b6, 0x007b, 0x007c, 0x007d, 0x007e, 0xffff,
  76
  77    0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
  78    0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
  79
  80    0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
  81    0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
  82
  83    0xffff, 0x03d2, 0x2032, 0x2264, 0x2215, 0x221e, 0xffff, 0x2663,
  84    0x2666, 0x2665, 0x2660, 0x2194, 0x2190, 0x2191, 0x2192, 0x2193,
  85
  86    0x00b0, 0x00b1, 0x2033, 0x2265, 0x00d7, 0x221d, 0x2202, 0x2022,
  87    0x00f7, 0x2260, 0x2261, 0x2248, 0x22ef, 0xffff, 0xffff, 0x21b5,
  88
  89    0x2135, 0x2111, 0x211c, 0x2118, 0x2297, 0x2295, 0x2205, 0x2229,
  90    0x222a, 0x2283, 0x2287, 0x2284, 0x2282, 0x2286, 0x2208, 0x2209,
  91
  92    0x2220, 0x2207, 0x00ae, 0x00a9, 0x2122, 0x220f, 0x221a, 0x22c5,
  93    0x00ac, 0x2227, 0x2228, 0x21d4, 0x21d0, 0x21d1, 0x21d2, 0x21d3,
  94
  95    0x2662, 0x2329, 0x00ae, 0x00a9, 0x2122, 0x2211, 0xffff, 0xffff,
  96    0xffff, 0x2308, 0xffff, 0x230a, 0xffff, 0xffff, 0xffff, 0xffff,
  97
  98    0xffff, 0x232a, 0x222b, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
  99    0xffff, 0x2309, 0xffff, 0x230b, 0xffff, 0xffff, 0xffff, 0xffff
 100 };
 101 #endif
 102
 103
 104 unsigned char arabic_table2[63][4] = {
 105         {0x41, 0x41, 0x41, 0x41}, // 0xc1 = hamza
 106         {0x42, 0xa1, 0x42, 0xa1}, // 0xc2 = ligature madda on alef
 107         {0x43, 0xa2, 0x43, 0xa2}, // 0xc3 = ligature hamza on alef
 108         {0x44, 0xa3, 0x44, 0xa3}, // 0xc4 = ligature hamza on waw
 109         {0x45, 0xa4, 0x45, 0xa4}, // 0xc5 = ligature hamza under alef
 110         {0x46, 0xf9, 0xf8, 0xa0}, // 0xc6 = ligature hamza on ya
 111         {0x47, 0xa5, 0x47, 0xa5}, // 0xc7 = alef
 112         {0x48, 0xae, 0xac, 0xad}, // 0xc8 = baa
 113         {0x49, 0xb1, 0x49, 0xb1}, // 0xc9 = taa marbuta
 114         {0x4a, 0xb4, 0xb2, 0xb3}, // 0xca = taa
 115         {0x4b, 0xb7, 0xb5, 0xb6}, // 0xcb = thaa
 116         {0x4c, 0xba, 0xb8, 0xb9}, // 0xcc = jeem
 117         {0x4d, 0xbd, 0xbb, 0xbc}, // 0xcd = haa
 118         {0x4e, 0xc0, 0xbe, 0xbf}, // 0xce = khaa
 119         {0x4f, 0xa6, 0x4f, 0xa6}, // 0xcf = dal
 120
 121         {0x50, 0xa7, 0x50, 0xa7}, // 0xd0 = thal
 122         {0x51, 0xa8, 0x51, 0xa8}, // 0xd1 = ra
 123         {0x52, 0xa9, 0x52, 0xa9}, // 0xd2 = zain
 124         {0x53, 0xc3, 0xc1, 0xc2}, // 0xd3 = seen
 125         {0x54, 0xc6, 0xc4, 0xc5}, // 0xd4 = sheen
 126         {0x55, 0xc9, 0xc7, 0xc8}, // 0xd5 = sad
 127         {0x56, 0xcc, 0xca, 0xcb}, // 0xd6 = dad
 128         {0x57, 0xcf, 0xcd, 0xce}, // 0xd7 = tah
 129         {0x58, 0xd2, 0xd0, 0xd1}, // 0xd8 = zah
 130         {0x59, 0xd5, 0xd3, 0xd4}, // 0xd9 = ain
 131         {0x5a, 0xd8, 0xd6, 0xd7}, // 0xda = ghain
 132         {0,0,0,0}, // 0xdb
 133         {0,0,0,0}, // 0xdc
 134         {0,0,0,0}, // 0xdd
 135         {0,0,0,0}, // 0xde
 136         {0,0,0,0}, // 0xdf
 137
 138         {0,0,0,0}, // 0xe0
 139         {0x61, 0xdb, 0xd9, 0xda}, // 0xe1 = fa
 140         {0x62, 0xde, 0xdc, 0xdd}, // 0xe2 = qaf
 141         {0x63, 0xe1, 0xdf, 0xe0}, // 0xe3 = kaf
 142         {0x64, 0xe4, 0xe2, 0xe3}, // 0xe4 = lam
 143         {0x65, 0xe7, 0xe5, 0xe6}, // 0xe5 = meem
 144         {0x66, 0xea, 0xe8, 0xe9}, // 0xe6 = noon
 145         {0x67, 0xed, 0xeb, 0xec}, // 0xe7 = ha
 146         {0x68, 0xaa, 0x68, 0xaa}, // 0xe8 = waw
 147         {0x69, 0xab, 0x69, 0xab}, // 0xe9 = alef maksura
 148         {0x6a, 0xf0, 0xee, 0xef}, // 0xea = ya
 149         {0x6b, 0x6b, 0x6b, 0x6b}, // 0xeb = fathatan
 150         {0x6c, 0x6c, 0x6c, 0x6c}, // 0xec = dammatan
 151         {0x6d, 0x6d, 0x6d, 0x6d}, // 0xed = kasratan
 152         {0x6e, 0x6e, 0x6e, 0x6e}, // 0xee = fatha
 153         {0x6f, 0x6f, 0x6f, 0x6f}, // 0xef = damma
 154
 155         {0x70, 0x70, 0x70, 0x70}, // 0xf0 = kasra
 156         {0x71, 0x71, 0x71, 0x71}, // 0xf1 = shadda
 157         {0x72, 0x72, 0x72, 0x72}, // 0xf2 = sukun
 158         {0,0,0,0}, // 0xf3
 159         {0,0,0,0}, // 0xf4
 160         {0,0,0,0}, // 0xf5
 161         {0,0,0,0}, // 0xf6
 162         {0,0,0,0}, // 0xf7
 163         {0,0,0,0}, // 0xf8
 164         {0,0,0,0}, // 0xf9
 165         {0,0,0,0}, // 0xfa
 166         {0,0,0,0}, // 0xfb
 167         {0,0,0,0}, // 0xfc
 168         {0,0,0,0}, // 0xfd
 169         {0,0,0,0}, // 0xfe
 170         {0,0,0,0}, // 0xff
 171 };
 172
 173
 174 unsigned char arabic_table[63][2] = {
 175         {0xc1, 0xc1}, // 0xc1 = hamza
 176         {0xc2, 0xc2}, // 0xc2 = ligature madda on alef
 177         {0xc3, 0xc3}, // 0xc3 = ligature hamza on alef
 178         {0xc4, 0xc4}, // 0xc4 = ligature hamza on waw
 179         {0xc5, 0xc5}, // 0xc5 = ligature hamza under alef
 180         {0xc6, 0xc0}, // 0xc6 = ligature hamza on ya
 181         {0xc7, 0xc7}, // 0xc7 = alef
 182         {0xc8, 0xeb}, // 0xc8 = baa
 183         {0xc9, 0xc9}, // 0xc9 = taa marbuta
 184         {0xca, 0xec}, // 0xca = taa
 185         {0xcb, 0xed}, // 0xcb = thaa
 186         {0xcc, 0xee}, // 0xcc = jeem
 187         {0xcd, 0xef}, // 0xcd = haa
 188         {0xce, 0xf0}, // 0xce = khaa
 189         {0xcf, 0xcf}, // 0xcf = dal
 190
 191         {0xd0, 0xd0}, // 0xd0 = thal
 192         {0xd1, 0xd1}, // 0xd1 = ra
 193         {0xd2, 0xd2}, // 0xd2 = zain
 194         {0xd3, 0xf1}, // 0xd3 = seen
 195         {0xd4, 0xf2}, // 0xd4 = sheen
 196         {0xd5, 0xf3}, // 0xd5 = sad
 197         {0xd6, 0xf4}, // 0xd6 = dad
 198         {0xd7, 0xd7}, // 0xd7 = tah
 199         {0xd8, 0xd8}, // 0xd8 = zah
 200         {0xd9, 0xf5}, // 0xd9 = ain
 201         {0xda, 0xf6}, // 0xda = ghain
 202         {0,0}, // 0xdb
 203         {0,0}, // 0xdc
 204         {0,0}, // 0xdd
 205         {0,0}, // 0xde
 206         {0,0}, // 0xdf
 207
 208         {0,0},  // 0xe0
 209         {0xe1, 0xf7},   // 0xe1 = fa
 210         {0xe2, 0xf8},   // 0xe2 = qaf
 211         {0xe3, 0xf9},   // 0xe3 = kaf
 212         {0xe4, 0xfa},   // 0xe4 = lam
 213         {0xe5, 0xfb},   // 0xe5 = meem
 214         {0xe6, 0xfc},   // 0xe6 = noon
 215         {0xe7, 0xfd},   // 0xe7 = ha
 216         {0xe8, 0xe8},   // 0xe8 = waw
 217         {0xe9, 0xe9},   // 0xe9 = alef maksura
 218         {0xea, 0xfe},   // 0xea = ya
 219         {0xa8, 0xa8},   // 0xeb = fathatan
 220         {0xa9, 0xa9},   // 0xec = dammatan
 221         {0xaa, 0xaa},   // 0xed = kasratan
 222         {0xab, 0xab},   // 0xee = fatha
 223         {0xac, 0xac},   // 0xef = damma
 224
 225         {0xad, 0xad},   // 0xf0 = kasra
 226         {0xae, 0xae},   // 0xf1 = shadda
 227         {0xaf, 0xaf},   // 0xf2 = sukun
 228         {0,0}, // 0xf3
 229         {0,0}, // 0xf4
 230         {0,0}, // 0xf5
 231         {0,0}, // 0xf6
 232         {0,0}, // 0xf7
 233         {0,0}, // 0xf8
 234         {0,0}, // 0xf9
 235         {0,0}, // 0xfa
 236         {0,0}, // 0xfb
 237         {0,0}, // 0xfc
 238         {0,0}, // 0xfd
 239         {0,0}, // 0xfe
 240         {0,0} // 0xff
 241 };
 242
 243
 244 unsigned char const arabic_start = 0xc1;
 245
 246 } // namespace anon
 247
 248
 249 bool Encodings::IsComposeChar_hebrew(unsigned char c)
 250 {
 251         return c <= 0xd2 && c >= 0xc0 &&
 252                 c != 0xce && c != 0xd0;
 253 }
 254
 255
 256 // Special Arabic letters are ones that do not get connected from left
 257 // they are hamza, alef_madda, alef_hamza, waw_hamza, alef_hamza_under,
 258 // alef, tah_marbota, dal, thal, rah, zai, wow, alef_maksoura
 259
 260 bool Encodings::is_arabic_special(unsigned char c)
 261 {
 262         return  (c >= 0xc1 && c <= 0xc5) ||
 263                  c == 0xc7 || c  == 0xc9  ||
 264                  c == 0xcf || c  == 0xe8  ||
 265                 (c >= 0xd0 && c <= 0xd2) ||
 266                  c == 0xe9;
 267 }
 268
 269 bool Encodings::IsComposeChar_arabic(unsigned char c)
 270 {
 271         return c >= 0xeb && c <= 0xf2;
 272 }
 273
 274
 275 bool Encodings::is_arabic(unsigned char c)
 276 {
 277         return c >= arabic_start && arabic_table[c-arabic_start][0];
 278 }
 279
 280
 281 unsigned char Encodings::TransformChar(unsigned char c,
 282                                       Encodings::Letter_Form form)
 283 {
 284         if (!is_arabic(c))
 285                 return c;
 286
 287         if (lyxrc.font_norm_type == LyXRC::ISO_10646_1)
 288                 return arabic_table2[c-arabic_start][form];
 289         else
 290                 return arabic_table[c-arabic_start][form >> 1];
 291 }
 292
 293
 294 Encoding const * Encodings::getEncoding(string const & encoding) const
 295 {
 296         EncodingList::const_iterator it = encodinglist.find(encoding);
 297         if (it != encodinglist.end())
 298                 return &it->second;
 299         else
 300                 return 0;
 301 }
 302
 303 Encodings::Encodings()
 304 {
 305         encodinglist["iso8859-1"] = Encoding("iso8859-1", "latin1", tab_iso8859_1);
 306         symbol_encoding_ =
 307 #ifdef USE_UNICODE_FOR_SYMBOLS
 308                 Encoding("symbol", "", tab_symbol);
 309 #else
 310                 Encoding("symbol", "", tab_iso8859_1);
 311 #endif
 312 }
 313
 314 void Encodings::read(string const & filename)
 315 {
 316         enum Encodingtags {
 317                 et_encoding = 1,
 318                 et_end,
 319                 et_last
 320         };
 321
 322         struct keyword_item encodingtags[et_last - 1] = {
 323                 { "encoding", et_encoding },
 324                 { "end", et_end }
 325         };
 326
 327         LyXLex lex(encodingtags, et_last - 1);
 328         lex.setFile(filename);
 329         while (lex.isOK()) {
 330                 switch (lex.lex()) {
 331                 case et_encoding:
 332                 {
 333                         lex.next();
 334                         string const name = lex.getString();
 335                         lex.next();
 336                         string const latexname = lex.getString();
 337                         lyxerr[Debug::INIT] << "Reading encoding " << name << endl;
 338                         Uchar table[256];
 339                         for (unsigned int i = 0; i < 256; ++i) {
 340                                 lex.next();
 341                                 string const tmp = lex.getString();
 342                                 table[i] = ::strtol(tmp.c_str(), 0 , 16);
 343                         }
 344                         encodinglist[name] = Encoding(name, latexname, table);
 345                         if (lex.lex() != et_end)
 346                                 lex.printError("Encodings::read: "
 347                                                "missing end");
 348                         break;
 349                 }
 350                 case et_end:
 351                         lex.printError("Encodings::read: Misplaced end");
 352                         break;
 353                 case LyXLex::LEX_FEOF:
 354                         break;
 355                 default:
 356                         lex.printError("Encodings::read: "
 357                                        "Unknown tag: `$$Token'");
 358                         break;
 359                 }
 360         }
 361 }