11ab64890Smrg
21ab64890Smrg/*
31ab64890Smrg * ISO-8859-9
41ab64890Smrg */
51ab64890Smrg
61ab64890Smrgstatic const unsigned short iso8859_9_2uni[48] = {
71ab64890Smrg  /* 0xd0 */
81ab64890Smrg  0x011e, 0x00d1, 0x00d2, 0x00d3, 0x00d4, 0x00d5, 0x00d6, 0x00d7,
91ab64890Smrg  0x00d8, 0x00d9, 0x00da, 0x00db, 0x00dc, 0x0130, 0x015e, 0x00df,
101ab64890Smrg  /* 0xe0 */
111ab64890Smrg  0x00e0, 0x00e1, 0x00e2, 0x00e3, 0x00e4, 0x00e5, 0x00e6, 0x00e7,
121ab64890Smrg  0x00e8, 0x00e9, 0x00ea, 0x00eb, 0x00ec, 0x00ed, 0x00ee, 0x00ef,
131ab64890Smrg  /* 0xf0 */
141ab64890Smrg  0x011f, 0x00f1, 0x00f2, 0x00f3, 0x00f4, 0x00f5, 0x00f6, 0x00f7,
151ab64890Smrg  0x00f8, 0x00f9, 0x00fa, 0x00fb, 0x00fc, 0x0131, 0x015f, 0x00ff,
161ab64890Smrg};
171ab64890Smrg
181ab64890Smrgstatic int
191ab64890Smrgiso8859_9_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, int n)
201ab64890Smrg{
211ab64890Smrg  unsigned char c = *s;
221ab64890Smrg  if (c >= 0xd0)
231ab64890Smrg    *pwc = (ucs4_t) iso8859_9_2uni[c-0xd0];
241ab64890Smrg  else
251ab64890Smrg    *pwc = (ucs4_t) c;
261ab64890Smrg  return 1;
271ab64890Smrg}
281ab64890Smrg
291ab64890Smrgstatic const unsigned char iso8859_9_page00[48] = {
301ab64890Smrg  0x00, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7, /* 0xd0-0xd7 */
311ab64890Smrg  0xd8, 0xd9, 0xda, 0xdb, 0xdc, 0x00, 0x00, 0xdf, /* 0xd8-0xdf */
321ab64890Smrg  0xe0, 0xe1, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, /* 0xe0-0xe7 */
331ab64890Smrg  0xe8, 0xe9, 0xea, 0xeb, 0xec, 0xed, 0xee, 0xef, /* 0xe8-0xef */
341ab64890Smrg  0x00, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, /* 0xf0-0xf7 */
351ab64890Smrg  0xf8, 0xf9, 0xfa, 0xfb, 0xfc, 0x00, 0x00, 0xff, /* 0xf8-0xff */
361ab64890Smrg};
371ab64890Smrgstatic const unsigned char iso8859_9_page01[72] = {
381ab64890Smrg  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xd0, 0xf0, /* 0x18-0x1f */
391ab64890Smrg  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x20-0x27 */
401ab64890Smrg  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x28-0x2f */
411ab64890Smrg  0xdd, 0xfd, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x30-0x37 */
421ab64890Smrg  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x38-0x3f */
431ab64890Smrg  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x40-0x47 */
441ab64890Smrg  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x48-0x4f */
451ab64890Smrg  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x50-0x57 */
461ab64890Smrg  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xde, 0xfe, /* 0x58-0x5f */
471ab64890Smrg};
481ab64890Smrg
491ab64890Smrgstatic int
501ab64890Smrgiso8859_9_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, int n)
511ab64890Smrg{
521ab64890Smrg  unsigned char c = 0;
531ab64890Smrg  if (wc < 0x00d0) {
549c019ec5Smaya    *r = (unsigned char) wc;
551ab64890Smrg    return 1;
561ab64890Smrg  }
571ab64890Smrg  else if (wc >= 0x00d0 && wc < 0x0100)
581ab64890Smrg    c = iso8859_9_page00[wc-0x00d0];
591ab64890Smrg  else if (wc >= 0x0118 && wc < 0x0160)
601ab64890Smrg    c = iso8859_9_page01[wc-0x0118];
611ab64890Smrg  if (c != 0) {
621ab64890Smrg    *r = c;
631ab64890Smrg    return 1;
641ab64890Smrg  }
651ab64890Smrg  return RET_ILSEQ;
661ab64890Smrg}
67