5 #define CASEMAP(u1,u2,l) { (u1), (l)-(u1), (u2)-(u1)+1 }
6 #define CASELACE(u1,u2) CASEMAP((u1),(u2),(u1)+1)
14 CASEMAP(0xc0,0xde,0xe0),
16 CASELACE(0x0100,0x012e),
17 CASELACE(0x0132,0x0136),
18 CASELACE(0x0139,0x0147),
19 CASELACE(0x014a,0x0176),
20 CASELACE(0x0179,0x017d),
22 CASELACE(0x370,0x372),
23 CASEMAP(0x391,0x3a1,0x3b1),
24 CASEMAP(0x3a3,0x3ab,0x3c3),
25 CASEMAP(0x400,0x40f,0x450),
26 CASEMAP(0x410,0x42f,0x430),
28 CASELACE(0x460,0x480),
29 CASELACE(0x48a,0x4be),
30 CASELACE(0x4c1,0x4cd),
31 CASELACE(0x4d0,0x50e),
33 CASEMAP(0x531,0x556,0x561),
35 CASELACE(0x01a0,0x01a4),
36 CASELACE(0x01b3,0x01b5),
37 CASELACE(0x01cd,0x01db),
38 CASELACE(0x01de,0x01ee),
39 CASELACE(0x01f8,0x021e),
40 CASELACE(0x0222,0x0232),
41 CASELACE(0x03d8,0x03ee),
43 CASELACE(0x1e00,0x1e94),
44 CASELACE(0x1ea0,0x1efe),
46 CASEMAP(0x1f08,0x1f0f,0x1f00),
47 CASEMAP(0x1f18,0x1f1d,0x1f10),
48 CASEMAP(0x1f28,0x1f2f,0x1f20),
49 CASEMAP(0x1f38,0x1f3f,0x1f30),
50 CASEMAP(0x1f48,0x1f4d,0x1f40),
52 CASEMAP(0x1f68,0x1f6f,0x1f60),
53 CASEMAP(0x1f88,0x1f8f,0x1f80),
54 CASEMAP(0x1f98,0x1f9f,0x1f90),
55 CASEMAP(0x1fa8,0x1faf,0x1fa0),
56 CASEMAP(0x1fb8,0x1fb9,0x1fb0),
57 CASEMAP(0x1fba,0x1fbb,0x1f70),
58 CASEMAP(0x1fc8,0x1fcb,0x1f72),
59 CASEMAP(0x1fd8,0x1fd9,0x1fd0),
60 CASEMAP(0x1fda,0x1fdb,0x1f76),
61 CASEMAP(0x1fe8,0x1fe9,0x1fe0),
62 CASEMAP(0x1fea,0x1feb,0x1f7a),
63 CASEMAP(0x1ff8,0x1ff9,0x1f78),
64 CASEMAP(0x1ffa,0x1ffb,0x1f7c),
66 CASELACE(0x246,0x24e),
67 CASELACE(0x510,0x512),
68 CASEMAP(0x2160,0x216f,0x2170),
69 CASEMAP(0x2c00,0x2c2e,0x2c30),
70 CASELACE(0x2c67,0x2c6b),
71 CASELACE(0x2c80,0x2ce2),
73 CASELACE(0xa722,0xa72e),
74 CASELACE(0xa732,0xa76e),
75 CASELACE(0xa779,0xa77b),
76 CASELACE(0xa77e,0xa786),
78 CASEMAP(0xff21,0xff3a,0xff41),
82 static const unsigned short pairs[][2] = {
189 /* bogus greek 'symbol' letters */
205 static wchar_t __towcase(wchar_t wc, int lower)
208 int lmul = 2*lower-1;
210 if ((unsigned)wc - 0x10400 < 0x50)
211 return wc + lmul*0x28;
212 /* no letters with case in these large ranges */
214 || (unsigned)wc - 0x0600 <= 0x0fff-0x0600
215 || (unsigned)wc - 0x2e00 <= 0xa6ff-0x2e00
216 || (unsigned)wc - 0xa800 <= 0xfeff-0xa800)
218 /* special case because the diff between upper/lower is too big */
219 if ((unsigned)wc - 0x10a0 < 0x26 || (unsigned)wc - 0x2d00 < 0x26)
220 return wc + lmul*(0x2d00-0x10a0);
221 for (i=0; casemaps[i].len; i++) {
222 int base = casemaps[i].upper + (lmask & casemaps[i].lower);
223 if ((unsigned)wc-base < casemaps[i].len) {
224 if (casemaps[i].lower == 1)
225 return wc + lower - ((wc-casemaps[i].upper)&1);
226 return wc + lmul*casemaps[i].lower;
229 for (i=0; pairs[i][1-lower]; i++) {
230 if (pairs[i][1-lower] == wc)
231 return pairs[i][lower];
233 if ((unsigned)wc - 0x10428 + (lower<<5) + (lower<<3) < 0x28)
234 return wc - 0x28 + (lower<<10) + (lower<<6);
238 wint_t towupper(wint_t wc)
240 return __towcase(wc, 0);
243 wint_t towlower(wint_t wc)
245 return __towcase(wc, 1);