150477Speter/*
216186Salex * Copyright (C) 1999-2001 Free Software Foundation, Inc.
316186Salex * This file is part of the GNU LIBICONV Library.
416186Salex *
516186Salex * The GNU LIBICONV Library is free software; you can redistribute it
616186Salex * and/or modify it under the terms of the GNU Library General Public
716186Salex * License as published by the Free Software Foundation; either version 2
816186Salex * of the License, or (at your option) any later version.
916186Salex *
1016186Salex * The GNU LIBICONV Library is distributed in the hope that it will be
1116186Salex * useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
1216186Salex * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
1316186Salex * Library General Public License for more details.
1416186Salex *
1516186Salex * You should have received a copy of the GNU Library General Public
1616186Salex * License along with the GNU LIBICONV Library; see the file COPYING.LIB.
1716186Salex * If not, write to the Free Software Foundation, Inc., 51 Franklin Street,
1816186Salex * Fifth Floor, Boston, MA 02110-1301, USA.
1916186Salex */
2016186Salex
2116186Salex/*
2216186Salex * GEORGIAN-ACADEMY
2316186Salex */
2416186Salex
2516186Salexstatic const unsigned short georgian_academy_2uni[32] = {
2616186Salex  /* 0x80 */
2716186Salex  0x0080, 0x0081, 0x201a, 0x0192, 0x201e, 0x2026, 0x2020, 0x2021,
2816186Salex  0x02c6, 0x2030, 0x0160, 0x2039, 0x0152, 0x008d, 0x008e, 0x008f,
2916186Salex  /* 0x90 */
3016186Salex  0x0090, 0x2018, 0x2019, 0x201c, 0x201d, 0x2022, 0x2013, 0x2014,
3116186Salex  0x02dc, 0x2122, 0x0161, 0x203a, 0x0153, 0x009d, 0x009e, 0x0178,
3216186Salex};
3316186Salex
34static int
35georgian_academy_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, int n)
36{
37  unsigned char c = *s;
38  if (c >= 0x80 && c < 0xa0)
39    *pwc = (ucs4_t) georgian_academy_2uni[c-0x80];
40  else if (c >= 0xc0 && c < 0xe7)
41    *pwc = (ucs4_t) c + 0x1010;
42  else
43    *pwc = (ucs4_t) c;
44  return 1;
45}
46
47static const unsigned char georgian_academy_page00[32] = {
48  0x80, 0x81, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x80-0x87 */
49  0x00, 0x00, 0x00, 0x00, 0x00, 0x8d, 0x8e, 0x8f, /* 0x88-0x8f */
50  0x90, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x90-0x97 */
51  0x00, 0x00, 0x00, 0x00, 0x00, 0x9d, 0x9e, 0x00, /* 0x98-0x9f */
52};
53static const unsigned char georgian_academy_page01[72] = {
54  0x00, 0x00, 0x8c, 0x9c, 0x00, 0x00, 0x00, 0x00, /* 0x50-0x57 */
55  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x58-0x5f */
56  0x8a, 0x9a, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x60-0x67 */
57  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x68-0x6f */
58  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x70-0x77 */
59  0x9f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x78-0x7f */
60  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x80-0x87 */
61  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x88-0x8f */
62  0x00, 0x00, 0x83, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x90-0x97 */
63};
64static const unsigned char georgian_academy_page02[32] = {
65  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x88, 0x00, /* 0xc0-0xc7 */
66  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0xc8-0xcf */
67  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0xd0-0xd7 */
68  0x00, 0x00, 0x00, 0x00, 0x98, 0x00, 0x00, 0x00, /* 0xd8-0xdf */
69};
70static const unsigned char georgian_academy_page20[48] = {
71  0x00, 0x00, 0x00, 0x96, 0x97, 0x00, 0x00, 0x00, /* 0x10-0x17 */
72  0x91, 0x92, 0x82, 0x00, 0x93, 0x94, 0x84, 0x00, /* 0x18-0x1f */
73  0x86, 0x87, 0x95, 0x00, 0x00, 0x00, 0x85, 0x00, /* 0x20-0x27 */
74  0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x28-0x2f */
75  0x89, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x30-0x37 */
76  0x00, 0x8b, 0x9b, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x38-0x3f */
77};
78
79static int
80georgian_academy_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, int n)
81{
82  unsigned char c = 0;
83  if (wc < 0x0080) {
84    *r = wc;
85    return 1;
86  }
87  else if (wc >= 0x0080 && wc < 0x00a0)
88    c = georgian_academy_page00[wc-0x0080];
89  else if ((wc >= 0x00a0 && wc < 0x00c0) || (wc >= 0x00e7 && wc < 0x0100))
90    c = wc;
91  else if (wc >= 0x0150 && wc < 0x0198)
92    c = georgian_academy_page01[wc-0x0150];
93  else if (wc >= 0x02c0 && wc < 0x02e0)
94    c = georgian_academy_page02[wc-0x02c0];
95  else if (wc >= 0x10d0 && wc < 0x10f7)
96    c = wc-0x1010;
97  else if (wc >= 0x2010 && wc < 0x2040)
98    c = georgian_academy_page20[wc-0x2010];
99  else if (wc == 0x2122)
100    c = 0x99;
101  if (c != 0) {
102    *r = c;
103    return 1;
104  }
105  return RET_ILUNI;
106}
107