1
2/*
3 * ISO-8859-9
4 */
5
6static const unsigned short iso8859_9_2uni[48] = {
7  /* 0xd0 */
8  0x011e, 0x00d1, 0x00d2, 0x00d3, 0x00d4, 0x00d5, 0x00d6, 0x00d7,
9  0x00d8, 0x00d9, 0x00da, 0x00db, 0x00dc, 0x0130, 0x015e, 0x00df,
10  /* 0xe0 */
11  0x00e0, 0x00e1, 0x00e2, 0x00e3, 0x00e4, 0x00e5, 0x00e6, 0x00e7,
12  0x00e8, 0x00e9, 0x00ea, 0x00eb, 0x00ec, 0x00ed, 0x00ee, 0x00ef,
13  /* 0xf0 */
14  0x011f, 0x00f1, 0x00f2, 0x00f3, 0x00f4, 0x00f5, 0x00f6, 0x00f7,
15  0x00f8, 0x00f9, 0x00fa, 0x00fb, 0x00fc, 0x0131, 0x015f, 0x00ff,
16};
17
18static int
19iso8859_9_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, int n)
20{
21  unsigned char c = *s;
22  if (c >= 0xd0)
23    *pwc = (ucs4_t) iso8859_9_2uni[c-0xd0];
24  else
25    *pwc = (ucs4_t) c;
26  return 1;
27}
28
29static const unsigned char iso8859_9_page00[48] = {
30  0x00, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7, /* 0xd0-0xd7 */
31  0xd8, 0xd9, 0xda, 0xdb, 0xdc, 0x00, 0x00, 0xdf, /* 0xd8-0xdf */
32  0xe0, 0xe1, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, /* 0xe0-0xe7 */
33  0xe8, 0xe9, 0xea, 0xeb, 0xec, 0xed, 0xee, 0xef, /* 0xe8-0xef */
34  0x00, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, /* 0xf0-0xf7 */
35  0xf8, 0xf9, 0xfa, 0xfb, 0xfc, 0x00, 0x00, 0xff, /* 0xf8-0xff */
36};
37static const unsigned char iso8859_9_page01[72] = {
38  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xd0, 0xf0, /* 0x18-0x1f */
39  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x20-0x27 */
40  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x28-0x2f */
41  0xdd, 0xfd, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x30-0x37 */
42  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x38-0x3f */
43  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x40-0x47 */
44  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x48-0x4f */
45  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x50-0x57 */
46  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xde, 0xfe, /* 0x58-0x5f */
47};
48
49static int
50iso8859_9_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, int n)
51{
52  unsigned char c = 0;
53  if (wc < 0x00d0) {
54    *r = (unsigned char) wc;
55    return 1;
56  }
57  else if (wc >= 0x00d0 && wc < 0x0100)
58    c = iso8859_9_page00[wc-0x00d0];
59  else if (wc >= 0x0118 && wc < 0x0160)
60    c = iso8859_9_page01[wc-0x0118];
61  if (c != 0) {
62    *r = c;
63    return 1;
64  }
65  return RET_ILSEQ;
66}
67