1*16d86563SAlexander Pyhalov /*
2*16d86563SAlexander Pyhalov * CDDL HEADER START
3*16d86563SAlexander Pyhalov *
4*16d86563SAlexander Pyhalov * The contents of this file are subject to the terms of the
5*16d86563SAlexander Pyhalov * Common Development and Distribution License (the "License").
6*16d86563SAlexander Pyhalov * You may not use this file except in compliance with the License.
7*16d86563SAlexander Pyhalov *
8*16d86563SAlexander Pyhalov * You can obtain a copy of the license at src/OPENSOLARIS.LICENSE
9*16d86563SAlexander Pyhalov * or http://www.opensolaris.org/os/licensing.
10*16d86563SAlexander Pyhalov * See the License for the specific language governing permissions
11*16d86563SAlexander Pyhalov * and limitations under the License.
12*16d86563SAlexander Pyhalov *
13*16d86563SAlexander Pyhalov * When distributing Covered Code, include this CDDL HEADER in each
14*16d86563SAlexander Pyhalov * file and include the License file at src/OPENSOLARIS.LICENSE.
15*16d86563SAlexander Pyhalov * If applicable, add the following below this CDDL HEADER, with the
16*16d86563SAlexander Pyhalov * fields enclosed by brackets "[]" replaced with your own identifying
17*16d86563SAlexander Pyhalov * information: Portions Copyright [yyyy] [name of copyright owner]
18*16d86563SAlexander Pyhalov *
19*16d86563SAlexander Pyhalov * CDDL HEADER END
20*16d86563SAlexander Pyhalov */
21*16d86563SAlexander Pyhalov /*
22*16d86563SAlexander Pyhalov * Copyright 1991-2003 Sun Microsystems, Inc. All rights reserved.
23*16d86563SAlexander Pyhalov * Use is subject to license terms.
24*16d86563SAlexander Pyhalov */
25*16d86563SAlexander Pyhalov
26*16d86563SAlexander Pyhalov
27*16d86563SAlexander Pyhalov #include <stdio.h>
28*16d86563SAlexander Pyhalov #include <stdlib.h>
29*16d86563SAlexander Pyhalov #include <errno.h>
30*16d86563SAlexander Pyhalov #include <euc.h>
31*16d86563SAlexander Pyhalov #include "japanese.h"
32*16d86563SAlexander Pyhalov
33*16d86563SAlexander Pyhalov /*
34*16d86563SAlexander Pyhalov * struct _cv_state; to keep status
35*16d86563SAlexander Pyhalov */
36*16d86563SAlexander Pyhalov struct _icv_state {
37*16d86563SAlexander Pyhalov int _st_cset;
38*16d86563SAlexander Pyhalov int _st_cset_sav;
39*16d86563SAlexander Pyhalov };
40*16d86563SAlexander Pyhalov
41*16d86563SAlexander Pyhalov static unsigned short lookuptbl(unsigned short);
42*16d86563SAlexander Pyhalov
43*16d86563SAlexander Pyhalov void *
_icv_open()44*16d86563SAlexander Pyhalov _icv_open()
45*16d86563SAlexander Pyhalov {
46*16d86563SAlexander Pyhalov struct _icv_state *st;
47*16d86563SAlexander Pyhalov
48*16d86563SAlexander Pyhalov if ((st = (struct _icv_state *)malloc(sizeof (struct _icv_state)))
49*16d86563SAlexander Pyhalov == NULL)
50*16d86563SAlexander Pyhalov return ((void *)ERR_RETURN);
51*16d86563SAlexander Pyhalov
52*16d86563SAlexander Pyhalov st->_st_cset = st->_st_cset_sav = CS_0;
53*16d86563SAlexander Pyhalov
54*16d86563SAlexander Pyhalov return (st);
55*16d86563SAlexander Pyhalov }
56*16d86563SAlexander Pyhalov
57*16d86563SAlexander Pyhalov void
_icv_close(struct _icv_state * st)58*16d86563SAlexander Pyhalov _icv_close(struct _icv_state *st)
59*16d86563SAlexander Pyhalov {
60*16d86563SAlexander Pyhalov free(st);
61*16d86563SAlexander Pyhalov }
62*16d86563SAlexander Pyhalov
63*16d86563SAlexander Pyhalov size_t
_icv_iconv(struct _icv_state * st,char ** inbuf,size_t * inbytesleft,char ** outbuf,size_t * outbytesleft)64*16d86563SAlexander Pyhalov _icv_iconv(struct _icv_state *st, char **inbuf, size_t *inbytesleft,
65*16d86563SAlexander Pyhalov char **outbuf, size_t *outbytesleft)
66*16d86563SAlexander Pyhalov {
67*16d86563SAlexander Pyhalov int cset;
68*16d86563SAlexander Pyhalov int stat = ST_INIT;
69*16d86563SAlexander Pyhalov unsigned char *op, ic;
70*16d86563SAlexander Pyhalov char *ip;
71*16d86563SAlexander Pyhalov size_t ileft, oleft;
72*16d86563SAlexander Pyhalov size_t retval;
73*16d86563SAlexander Pyhalov
74*16d86563SAlexander Pyhalov /*
75*16d86563SAlexander Pyhalov * If inbuf and/or *inbuf are NULL, reset conversion descriptor
76*16d86563SAlexander Pyhalov * and put escape sequence if needed.
77*16d86563SAlexander Pyhalov */
78*16d86563SAlexander Pyhalov if ((inbuf == NULL) || (*inbuf == NULL)) {
79*16d86563SAlexander Pyhalov st->_st_cset_sav = st->_st_cset = CS_0;
80*16d86563SAlexander Pyhalov return ((size_t)0);
81*16d86563SAlexander Pyhalov }
82*16d86563SAlexander Pyhalov
83*16d86563SAlexander Pyhalov cset = st->_st_cset;
84*16d86563SAlexander Pyhalov
85*16d86563SAlexander Pyhalov ip = *inbuf;
86*16d86563SAlexander Pyhalov op = (unsigned char *)*outbuf;
87*16d86563SAlexander Pyhalov ileft = *inbytesleft;
88*16d86563SAlexander Pyhalov oleft = *outbytesleft;
89*16d86563SAlexander Pyhalov
90*16d86563SAlexander Pyhalov /*
91*16d86563SAlexander Pyhalov * Main loop; basically 1 loop per 1 input byte
92*16d86563SAlexander Pyhalov */
93*16d86563SAlexander Pyhalov
94*16d86563SAlexander Pyhalov while ((int)ileft > 0) {
95*16d86563SAlexander Pyhalov GET(ic);
96*16d86563SAlexander Pyhalov if (stat == ST_INIT) {
97*16d86563SAlexander Pyhalov goto text;
98*16d86563SAlexander Pyhalov }
99*16d86563SAlexander Pyhalov if (stat == ST_ESC) {
100*16d86563SAlexander Pyhalov if (ic == MBTOG0_1) {
101*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
102*16d86563SAlexander Pyhalov stat = ST_MBTOG0_1;
103*16d86563SAlexander Pyhalov continue;
104*16d86563SAlexander Pyhalov } else {
105*16d86563SAlexander Pyhalov UNGET();
106*16d86563SAlexander Pyhalov UNGET();
107*16d86563SAlexander Pyhalov errno = EINVAL;
108*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
109*16d86563SAlexander Pyhalov goto ret;
110*16d86563SAlexander Pyhalov }
111*16d86563SAlexander Pyhalov } else if (ic == SBTOG0_1) {
112*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
113*16d86563SAlexander Pyhalov stat = ST_SBTOG0;
114*16d86563SAlexander Pyhalov continue;
115*16d86563SAlexander Pyhalov } else {
116*16d86563SAlexander Pyhalov UNGET();
117*16d86563SAlexander Pyhalov UNGET();
118*16d86563SAlexander Pyhalov errno = EINVAL;
119*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
120*16d86563SAlexander Pyhalov goto ret;
121*16d86563SAlexander Pyhalov }
122*16d86563SAlexander Pyhalov } else if (ic == X208REV_1) {
123*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
124*16d86563SAlexander Pyhalov stat = ST_208REV_1;
125*16d86563SAlexander Pyhalov continue;
126*16d86563SAlexander Pyhalov } else {
127*16d86563SAlexander Pyhalov UNGET();
128*16d86563SAlexander Pyhalov UNGET();
129*16d86563SAlexander Pyhalov errno = EINVAL;
130*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
131*16d86563SAlexander Pyhalov goto ret;
132*16d86563SAlexander Pyhalov }
133*16d86563SAlexander Pyhalov } else {
134*16d86563SAlexander Pyhalov UNGET();
135*16d86563SAlexander Pyhalov UNGET();
136*16d86563SAlexander Pyhalov errno = EILSEQ;
137*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
138*16d86563SAlexander Pyhalov goto ret;
139*16d86563SAlexander Pyhalov }
140*16d86563SAlexander Pyhalov } else if (stat == ST_MBTOG0_1) {
141*16d86563SAlexander Pyhalov if ((ic == F_X0208_83_90) || (ic == F_X0208_78)) {
142*16d86563SAlexander Pyhalov stat = ST_INIT;
143*16d86563SAlexander Pyhalov st->_st_cset_sav = cset = CS_1;
144*16d86563SAlexander Pyhalov continue;
145*16d86563SAlexander Pyhalov } else if (ic == MBTOG0_2) {
146*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
147*16d86563SAlexander Pyhalov stat = ST_MBTOG0_2;
148*16d86563SAlexander Pyhalov continue;
149*16d86563SAlexander Pyhalov } else {
150*16d86563SAlexander Pyhalov UNGET();
151*16d86563SAlexander Pyhalov UNGET();
152*16d86563SAlexander Pyhalov UNGET();
153*16d86563SAlexander Pyhalov errno = EINVAL;
154*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
155*16d86563SAlexander Pyhalov goto ret;
156*16d86563SAlexander Pyhalov }
157*16d86563SAlexander Pyhalov } else if (ic == F_X0212_90) {
158*16d86563SAlexander Pyhalov stat = ST_INIT;
159*16d86563SAlexander Pyhalov st->_st_cset_sav = cset = CS_3;
160*16d86563SAlexander Pyhalov continue;
161*16d86563SAlexander Pyhalov } else {
162*16d86563SAlexander Pyhalov UNGET();
163*16d86563SAlexander Pyhalov UNGET();
164*16d86563SAlexander Pyhalov UNGET();
165*16d86563SAlexander Pyhalov errno = EILSEQ;
166*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
167*16d86563SAlexander Pyhalov goto ret;
168*16d86563SAlexander Pyhalov }
169*16d86563SAlexander Pyhalov } else if (stat == ST_MBTOG0_2) {
170*16d86563SAlexander Pyhalov if ((ic == F_X0208_83_90) || (ic == F_X0208_78)) {
171*16d86563SAlexander Pyhalov stat = ST_INIT;
172*16d86563SAlexander Pyhalov st->_st_cset_sav = cset = CS_1;
173*16d86563SAlexander Pyhalov continue;
174*16d86563SAlexander Pyhalov } else if (ic == F_X0212_90) {
175*16d86563SAlexander Pyhalov stat = ST_INIT;
176*16d86563SAlexander Pyhalov st->_st_cset_sav = cset = CS_3;
177*16d86563SAlexander Pyhalov continue;
178*16d86563SAlexander Pyhalov } else {
179*16d86563SAlexander Pyhalov UNGET();
180*16d86563SAlexander Pyhalov UNGET();
181*16d86563SAlexander Pyhalov UNGET();
182*16d86563SAlexander Pyhalov UNGET();
183*16d86563SAlexander Pyhalov errno = EILSEQ;
184*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
185*16d86563SAlexander Pyhalov goto ret;
186*16d86563SAlexander Pyhalov }
187*16d86563SAlexander Pyhalov } else if (stat == ST_SBTOG0) {
188*16d86563SAlexander Pyhalov if ((ic == F_ASCII) ||
189*16d86563SAlexander Pyhalov (ic == F_X0201_RM) ||
190*16d86563SAlexander Pyhalov (ic == F_ISO646)) {
191*16d86563SAlexander Pyhalov stat = ST_INIT;
192*16d86563SAlexander Pyhalov st->_st_cset_sav = cset = CS_0;
193*16d86563SAlexander Pyhalov continue;
194*16d86563SAlexander Pyhalov } else if (ic == F_X0201_KN) {
195*16d86563SAlexander Pyhalov cset = CS_2;
196*16d86563SAlexander Pyhalov stat = ST_INIT;
197*16d86563SAlexander Pyhalov continue;
198*16d86563SAlexander Pyhalov } else {
199*16d86563SAlexander Pyhalov UNGET();
200*16d86563SAlexander Pyhalov UNGET();
201*16d86563SAlexander Pyhalov UNGET();
202*16d86563SAlexander Pyhalov errno = EILSEQ;
203*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
204*16d86563SAlexander Pyhalov goto ret;
205*16d86563SAlexander Pyhalov }
206*16d86563SAlexander Pyhalov } else if (stat == ST_208REV_1) {
207*16d86563SAlexander Pyhalov if (ic == X208REV_2) {
208*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
209*16d86563SAlexander Pyhalov stat = ST_208REV_2;
210*16d86563SAlexander Pyhalov continue;
211*16d86563SAlexander Pyhalov } else {
212*16d86563SAlexander Pyhalov UNGET();
213*16d86563SAlexander Pyhalov UNGET();
214*16d86563SAlexander Pyhalov UNGET();
215*16d86563SAlexander Pyhalov errno = EINVAL;
216*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
217*16d86563SAlexander Pyhalov goto ret;
218*16d86563SAlexander Pyhalov }
219*16d86563SAlexander Pyhalov } else {
220*16d86563SAlexander Pyhalov UNGET();
221*16d86563SAlexander Pyhalov UNGET();
222*16d86563SAlexander Pyhalov UNGET();
223*16d86563SAlexander Pyhalov errno = EILSEQ;
224*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
225*16d86563SAlexander Pyhalov goto ret;
226*16d86563SAlexander Pyhalov }
227*16d86563SAlexander Pyhalov } else if (stat == ST_208REV_2) {
228*16d86563SAlexander Pyhalov if (ic == ESC) {
229*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
230*16d86563SAlexander Pyhalov stat = ST_REV_AFT_ESC;
231*16d86563SAlexander Pyhalov continue;
232*16d86563SAlexander Pyhalov } else {
233*16d86563SAlexander Pyhalov UNGET();
234*16d86563SAlexander Pyhalov UNGET();
235*16d86563SAlexander Pyhalov UNGET();
236*16d86563SAlexander Pyhalov UNGET();
237*16d86563SAlexander Pyhalov errno = EINVAL;
238*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
239*16d86563SAlexander Pyhalov goto ret;
240*16d86563SAlexander Pyhalov }
241*16d86563SAlexander Pyhalov } else {
242*16d86563SAlexander Pyhalov UNGET();
243*16d86563SAlexander Pyhalov UNGET();
244*16d86563SAlexander Pyhalov UNGET();
245*16d86563SAlexander Pyhalov UNGET();
246*16d86563SAlexander Pyhalov errno = EILSEQ;
247*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
248*16d86563SAlexander Pyhalov goto ret;
249*16d86563SAlexander Pyhalov }
250*16d86563SAlexander Pyhalov } else if (stat == ST_REV_AFT_ESC) {
251*16d86563SAlexander Pyhalov if (ic == MBTOG0_1) {
252*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
253*16d86563SAlexander Pyhalov stat = ST_REV_AFT_MBTOG0_1;
254*16d86563SAlexander Pyhalov continue;
255*16d86563SAlexander Pyhalov } else {
256*16d86563SAlexander Pyhalov UNGET();
257*16d86563SAlexander Pyhalov UNGET();
258*16d86563SAlexander Pyhalov UNGET();
259*16d86563SAlexander Pyhalov UNGET();
260*16d86563SAlexander Pyhalov UNGET();
261*16d86563SAlexander Pyhalov errno = EINVAL;
262*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
263*16d86563SAlexander Pyhalov goto ret;
264*16d86563SAlexander Pyhalov }
265*16d86563SAlexander Pyhalov } else {
266*16d86563SAlexander Pyhalov UNGET();
267*16d86563SAlexander Pyhalov UNGET();
268*16d86563SAlexander Pyhalov UNGET();
269*16d86563SAlexander Pyhalov UNGET();
270*16d86563SAlexander Pyhalov UNGET();
271*16d86563SAlexander Pyhalov errno = EILSEQ;
272*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
273*16d86563SAlexander Pyhalov goto ret;
274*16d86563SAlexander Pyhalov }
275*16d86563SAlexander Pyhalov } else if (stat == ST_REV_AFT_MBTOG0_1) {
276*16d86563SAlexander Pyhalov if (ic == F_X0208_83_90) {
277*16d86563SAlexander Pyhalov stat = ST_INIT;
278*16d86563SAlexander Pyhalov st->_st_cset_sav = cset = CS_1;
279*16d86563SAlexander Pyhalov continue;
280*16d86563SAlexander Pyhalov } else if (ic == MBTOG0_2) {
281*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
282*16d86563SAlexander Pyhalov stat = ST_REV_AFT_MBTOG0_2;
283*16d86563SAlexander Pyhalov continue;
284*16d86563SAlexander Pyhalov } else {
285*16d86563SAlexander Pyhalov UNGET();
286*16d86563SAlexander Pyhalov UNGET();
287*16d86563SAlexander Pyhalov UNGET();
288*16d86563SAlexander Pyhalov UNGET();
289*16d86563SAlexander Pyhalov UNGET();
290*16d86563SAlexander Pyhalov UNGET();
291*16d86563SAlexander Pyhalov errno = EINVAL;
292*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
293*16d86563SAlexander Pyhalov goto ret;
294*16d86563SAlexander Pyhalov }
295*16d86563SAlexander Pyhalov } else {
296*16d86563SAlexander Pyhalov UNGET();
297*16d86563SAlexander Pyhalov UNGET();
298*16d86563SAlexander Pyhalov UNGET();
299*16d86563SAlexander Pyhalov UNGET();
300*16d86563SAlexander Pyhalov UNGET();
301*16d86563SAlexander Pyhalov UNGET();
302*16d86563SAlexander Pyhalov errno = EILSEQ;
303*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
304*16d86563SAlexander Pyhalov goto ret;
305*16d86563SAlexander Pyhalov }
306*16d86563SAlexander Pyhalov } else if (stat == ST_REV_AFT_MBTOG0_2) {
307*16d86563SAlexander Pyhalov if (ic == F_X0208_83_90) {
308*16d86563SAlexander Pyhalov stat = ST_INIT;
309*16d86563SAlexander Pyhalov st->_st_cset_sav = cset = CS_1;
310*16d86563SAlexander Pyhalov continue;
311*16d86563SAlexander Pyhalov } else {
312*16d86563SAlexander Pyhalov UNGET();
313*16d86563SAlexander Pyhalov UNGET();
314*16d86563SAlexander Pyhalov UNGET();
315*16d86563SAlexander Pyhalov UNGET();
316*16d86563SAlexander Pyhalov UNGET();
317*16d86563SAlexander Pyhalov UNGET();
318*16d86563SAlexander Pyhalov UNGET();
319*16d86563SAlexander Pyhalov errno = EILSEQ;
320*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
321*16d86563SAlexander Pyhalov goto ret;
322*16d86563SAlexander Pyhalov }
323*16d86563SAlexander Pyhalov }
324*16d86563SAlexander Pyhalov text:
325*16d86563SAlexander Pyhalov /*
326*16d86563SAlexander Pyhalov * Break through chars or ESC sequence
327*16d86563SAlexander Pyhalov */
328*16d86563SAlexander Pyhalov if (ic == ESC) {
329*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
330*16d86563SAlexander Pyhalov stat = ST_ESC;
331*16d86563SAlexander Pyhalov continue;
332*16d86563SAlexander Pyhalov } else {
333*16d86563SAlexander Pyhalov UNGET();
334*16d86563SAlexander Pyhalov errno = EINVAL;
335*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
336*16d86563SAlexander Pyhalov goto ret;
337*16d86563SAlexander Pyhalov }
338*16d86563SAlexander Pyhalov } else if (ic == SO) {
339*16d86563SAlexander Pyhalov cset = CS_2;
340*16d86563SAlexander Pyhalov stat = ST_INIT;
341*16d86563SAlexander Pyhalov continue;
342*16d86563SAlexander Pyhalov } else if (ic == SI) {
343*16d86563SAlexander Pyhalov cset = st->_st_cset_sav;
344*16d86563SAlexander Pyhalov stat = ST_INIT;
345*16d86563SAlexander Pyhalov continue;
346*16d86563SAlexander Pyhalov }
347*16d86563SAlexander Pyhalov if (!(ic & CMSB)) {
348*16d86563SAlexander Pyhalov if (cset == CS_0) {
349*16d86563SAlexander Pyhalov /* ASCII or JIS roman : may be 8bit chars */
350*16d86563SAlexander Pyhalov if (oleft < SJISW0) {
351*16d86563SAlexander Pyhalov UNGET();
352*16d86563SAlexander Pyhalov errno = E2BIG;
353*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
354*16d86563SAlexander Pyhalov goto ret;
355*16d86563SAlexander Pyhalov }
356*16d86563SAlexander Pyhalov PUT(ic);
357*16d86563SAlexander Pyhalov continue;
358*16d86563SAlexander Pyhalov } else if (cset == CS_1) { /* CS_1 Kanji starts */
359*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
360*16d86563SAlexander Pyhalov int even_ku;
361*16d86563SAlexander Pyhalov if (oleft < SJISW1) {
362*16d86563SAlexander Pyhalov UNGET();
363*16d86563SAlexander Pyhalov errno = E2BIG;
364*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
365*16d86563SAlexander Pyhalov goto ret;
366*16d86563SAlexander Pyhalov }
367*16d86563SAlexander Pyhalov if ((ic < 0x21) || (ic == 0x7f)) {
368*16d86563SAlexander Pyhalov UNGET();
369*16d86563SAlexander Pyhalov errno = EILSEQ;
370*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
371*16d86563SAlexander Pyhalov goto ret;
372*16d86563SAlexander Pyhalov }
373*16d86563SAlexander Pyhalov if ((*ip < 0x21) || (*ip == 0x7f)) {
374*16d86563SAlexander Pyhalov UNGET();
375*16d86563SAlexander Pyhalov errno = EILSEQ;
376*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
377*16d86563SAlexander Pyhalov goto ret;
378*16d86563SAlexander Pyhalov }
379*16d86563SAlexander Pyhalov PUT(jis208tosj1[ic]);
380*16d86563SAlexander Pyhalov if ((ic % 2) == 0)
381*16d86563SAlexander Pyhalov even_ku = TRUE;
382*16d86563SAlexander Pyhalov else
383*16d86563SAlexander Pyhalov even_ku = FALSE;
384*16d86563SAlexander Pyhalov GET(ic);
385*16d86563SAlexander Pyhalov if (even_ku)
386*16d86563SAlexander Pyhalov ic += 0x80;
387*16d86563SAlexander Pyhalov PUT(jistosj2[ic]);
388*16d86563SAlexander Pyhalov continue;
389*16d86563SAlexander Pyhalov } else { /* input fragment of Kanji */
390*16d86563SAlexander Pyhalov UNGET();
391*16d86563SAlexander Pyhalov errno = EINVAL;
392*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
393*16d86563SAlexander Pyhalov goto ret;
394*16d86563SAlexander Pyhalov }
395*16d86563SAlexander Pyhalov } else if (cset == CS_2) { /* Hankaku Katakana */
396*16d86563SAlexander Pyhalov if (oleft < SJISW2) {
397*16d86563SAlexander Pyhalov UNGET();
398*16d86563SAlexander Pyhalov errno = E2BIG;
399*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
400*16d86563SAlexander Pyhalov goto ret;
401*16d86563SAlexander Pyhalov }
402*16d86563SAlexander Pyhalov PUT(ic | CMSB);
403*16d86563SAlexander Pyhalov continue;
404*16d86563SAlexander Pyhalov } else if (cset == CS_3) { /* CS_3 Kanji starts */
405*16d86563SAlexander Pyhalov unsigned short dest;
406*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
407*16d86563SAlexander Pyhalov if (oleft < SJISW1) {
408*16d86563SAlexander Pyhalov UNGET();
409*16d86563SAlexander Pyhalov errno = E2BIG;
410*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
411*16d86563SAlexander Pyhalov goto ret;
412*16d86563SAlexander Pyhalov }
413*16d86563SAlexander Pyhalov if ((ic < 0x21) || (ic == 0x7f)) {
414*16d86563SAlexander Pyhalov UNGET();
415*16d86563SAlexander Pyhalov errno = EILSEQ;
416*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
417*16d86563SAlexander Pyhalov goto ret;
418*16d86563SAlexander Pyhalov }
419*16d86563SAlexander Pyhalov if ((*ip < 0x21) || (*ip == 0x7f)) {
420*16d86563SAlexander Pyhalov UNGET();
421*16d86563SAlexander Pyhalov errno = EILSEQ;
422*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
423*16d86563SAlexander Pyhalov goto ret;
424*16d86563SAlexander Pyhalov }
425*16d86563SAlexander Pyhalov if (ic < 0x75) { /* check IBM area */
426*16d86563SAlexander Pyhalov dest = (ic << 8);
427*16d86563SAlexander Pyhalov GET(ic);
428*16d86563SAlexander Pyhalov dest += ic;
429*16d86563SAlexander Pyhalov dest = lookuptbl(dest);
430*16d86563SAlexander Pyhalov if (dest == 0xffff) {
431*16d86563SAlexander Pyhalov /*
432*16d86563SAlexander Pyhalov * Illegal code points
433*16d86563SAlexander Pyhalov * in G3 plane.
434*16d86563SAlexander Pyhalov */
435*16d86563SAlexander Pyhalov UNGET();
436*16d86563SAlexander Pyhalov UNGET();
437*16d86563SAlexander Pyhalov errno = EILSEQ;
438*16d86563SAlexander Pyhalov retval =
439*16d86563SAlexander Pyhalov (size_t)ERR_RETURN;
440*16d86563SAlexander Pyhalov goto ret;
441*16d86563SAlexander Pyhalov } else {
442*16d86563SAlexander Pyhalov PUT((dest >> 8) &
443*16d86563SAlexander Pyhalov 0xff);
444*16d86563SAlexander Pyhalov PUT(dest & 0xff);
445*16d86563SAlexander Pyhalov }
446*16d86563SAlexander Pyhalov continue;
447*16d86563SAlexander Pyhalov } else {
448*16d86563SAlexander Pyhalov int even_ku;
449*16d86563SAlexander Pyhalov
450*16d86563SAlexander Pyhalov if ((ic % 2) == 0)
451*16d86563SAlexander Pyhalov even_ku = TRUE;
452*16d86563SAlexander Pyhalov else
453*16d86563SAlexander Pyhalov even_ku = FALSE;
454*16d86563SAlexander Pyhalov PUT(jis212tosj1[ic]);
455*16d86563SAlexander Pyhalov GET(ic);
456*16d86563SAlexander Pyhalov if (even_ku)
457*16d86563SAlexander Pyhalov ic += 0x80;
458*16d86563SAlexander Pyhalov PUT(jistosj2[ic]);
459*16d86563SAlexander Pyhalov continue;
460*16d86563SAlexander Pyhalov }
461*16d86563SAlexander Pyhalov } else { /* input fragment of Kanji */
462*16d86563SAlexander Pyhalov UNGET();
463*16d86563SAlexander Pyhalov errno = EINVAL;
464*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
465*16d86563SAlexander Pyhalov goto ret;
466*16d86563SAlexander Pyhalov }
467*16d86563SAlexander Pyhalov }
468*16d86563SAlexander Pyhalov } else {
469*16d86563SAlexander Pyhalov if (oleft < UNKNOWNW) {
470*16d86563SAlexander Pyhalov UNGET();
471*16d86563SAlexander Pyhalov errno = E2BIG;
472*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
473*16d86563SAlexander Pyhalov goto ret;
474*16d86563SAlexander Pyhalov }
475*16d86563SAlexander Pyhalov PUT(ic);
476*16d86563SAlexander Pyhalov continue;
477*16d86563SAlexander Pyhalov }
478*16d86563SAlexander Pyhalov }
479*16d86563SAlexander Pyhalov retval = ileft;
480*16d86563SAlexander Pyhalov ret:
481*16d86563SAlexander Pyhalov *inbuf = ip;
482*16d86563SAlexander Pyhalov *inbytesleft = ileft;
483*16d86563SAlexander Pyhalov *outbuf = (char *)op;
484*16d86563SAlexander Pyhalov *outbytesleft = oleft;
485*16d86563SAlexander Pyhalov st->_st_cset = cset;
486*16d86563SAlexander Pyhalov
487*16d86563SAlexander Pyhalov return (retval);
488*16d86563SAlexander Pyhalov }
489*16d86563SAlexander Pyhalov
490*16d86563SAlexander Pyhalov /*
491*16d86563SAlexander Pyhalov * lookuptbl()
492*16d86563SAlexander Pyhalov * Return the index number if its index-ed number
493*16d86563SAlexander Pyhalov * is the same as dest value.
494*16d86563SAlexander Pyhalov */
495*16d86563SAlexander Pyhalov static unsigned short
lookuptbl(unsigned short dest)496*16d86563SAlexander Pyhalov lookuptbl(unsigned short dest)
497*16d86563SAlexander Pyhalov {
498*16d86563SAlexander Pyhalov unsigned short tmp;
499*16d86563SAlexander Pyhalov int i;
500*16d86563SAlexander Pyhalov int sz = (sizeof (sjtoibmext) / sizeof (sjtoibmext[0]));
501*16d86563SAlexander Pyhalov
502*16d86563SAlexander Pyhalov for (i = 0; i < sz; i++) {
503*16d86563SAlexander Pyhalov tmp = (sjtoibmext[i] & 0x7f7f);
504*16d86563SAlexander Pyhalov if (tmp == dest)
505*16d86563SAlexander Pyhalov return ((i + 0xfa40 + ((i / 0xc0) * 0x40)));
506*16d86563SAlexander Pyhalov }
507*16d86563SAlexander Pyhalov return (PGETA);
508*16d86563SAlexander Pyhalov }
509