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 1994-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 #include <stdio.h>
27*16d86563SAlexander Pyhalov #include <stdlib.h>
28*16d86563SAlexander Pyhalov #include <errno.h>
29*16d86563SAlexander Pyhalov #include <euc.h>
30*16d86563SAlexander Pyhalov #define JFP_ICONV_STATELESS
31*16d86563SAlexander Pyhalov #include "japanese.h"
32*16d86563SAlexander Pyhalov
33*16d86563SAlexander Pyhalov void *
_icv_open(void)34*16d86563SAlexander Pyhalov _icv_open(void)
35*16d86563SAlexander Pyhalov {
36*16d86563SAlexander Pyhalov return (_icv_open_stateless());
37*16d86563SAlexander Pyhalov }
38*16d86563SAlexander Pyhalov
39*16d86563SAlexander Pyhalov void
_icv_close(void * cd)40*16d86563SAlexander Pyhalov _icv_close(void *cd)
41*16d86563SAlexander Pyhalov {
42*16d86563SAlexander Pyhalov _icv_close_stateless(cd);
43*16d86563SAlexander Pyhalov return;
44*16d86563SAlexander Pyhalov }
45*16d86563SAlexander Pyhalov
46*16d86563SAlexander Pyhalov size_t
_icv_iconv(void * cd,char ** inbuf,size_t * inbytesleft,char ** outbuf,size_t * outbytesleft)47*16d86563SAlexander Pyhalov _icv_iconv(void *cd, char **inbuf, size_t *inbytesleft,
48*16d86563SAlexander Pyhalov char **outbuf, size_t *outbytesleft)
49*16d86563SAlexander Pyhalov {
50*16d86563SAlexander Pyhalov int stat;
51*16d86563SAlexander Pyhalov unsigned char *ip, ic;
52*16d86563SAlexander Pyhalov char *op;
53*16d86563SAlexander Pyhalov size_t ileft, oleft;
54*16d86563SAlexander Pyhalov size_t retval;
55*16d86563SAlexander Pyhalov
56*16d86563SAlexander Pyhalov stat = ST_INIT;
57*16d86563SAlexander Pyhalov
58*16d86563SAlexander Pyhalov /*
59*16d86563SAlexander Pyhalov * If inbuf and/or *inbuf are NULL, reset conversion descriptor
60*16d86563SAlexander Pyhalov * and put escape sequence if needed.
61*16d86563SAlexander Pyhalov */
62*16d86563SAlexander Pyhalov if ((inbuf == NULL) || (*inbuf == NULL)) {
63*16d86563SAlexander Pyhalov /* nothing to do here for this module */
64*16d86563SAlexander Pyhalov return ((size_t)0);
65*16d86563SAlexander Pyhalov }
66*16d86563SAlexander Pyhalov
67*16d86563SAlexander Pyhalov ip = (unsigned char *)*inbuf;
68*16d86563SAlexander Pyhalov op = *outbuf;
69*16d86563SAlexander Pyhalov ileft = *inbytesleft;
70*16d86563SAlexander Pyhalov oleft = *outbytesleft;
71*16d86563SAlexander Pyhalov
72*16d86563SAlexander Pyhalov /*
73*16d86563SAlexander Pyhalov * Main loop; basically 1 loop per 1 input byte
74*16d86563SAlexander Pyhalov */
75*16d86563SAlexander Pyhalov
76*16d86563SAlexander Pyhalov while ((int)ileft > 0) {
77*16d86563SAlexander Pyhalov GET(ic);
78*16d86563SAlexander Pyhalov if (stat == ST_INCS1) {
79*16d86563SAlexander Pyhalov PUT(((ic & CMASK) - 0x20));
80*16d86563SAlexander Pyhalov stat = ST_INIT;
81*16d86563SAlexander Pyhalov continue;
82*16d86563SAlexander Pyhalov } else if (stat == ST_INCS3) {
83*16d86563SAlexander Pyhalov PUT(((ic & CMASK) - 0x20));
84*16d86563SAlexander Pyhalov GET(ic);
85*16d86563SAlexander Pyhalov PUT(((ic & CMASK) - 0x20));
86*16d86563SAlexander Pyhalov stat = ST_INIT;
87*16d86563SAlexander Pyhalov continue;
88*16d86563SAlexander Pyhalov }
89*16d86563SAlexander Pyhalov if (ISASC((int)ic)) { /* ASCII */
90*16d86563SAlexander Pyhalov errno = EILSEQ;
91*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
92*16d86563SAlexander Pyhalov goto ret;
93*16d86563SAlexander Pyhalov } else if (ISCS1(ic)) { /* CS_1 starts */
94*16d86563SAlexander Pyhalov if ((int)ileft > 0) {
95*16d86563SAlexander Pyhalov if (ISCS1(ic) && ISCS1(*ip)) {
96*16d86563SAlexander Pyhalov if (oleft < JISW1) {
97*16d86563SAlexander Pyhalov UNGET();
98*16d86563SAlexander Pyhalov errno = E2BIG;
99*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
100*16d86563SAlexander Pyhalov goto ret;
101*16d86563SAlexander Pyhalov }
102*16d86563SAlexander Pyhalov stat = ST_INCS1;
103*16d86563SAlexander Pyhalov PUT(((ic & CMASK) - 0x20));
104*16d86563SAlexander Pyhalov continue;
105*16d86563SAlexander Pyhalov } else {
106*16d86563SAlexander Pyhalov errno = EILSEQ;
107*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
108*16d86563SAlexander Pyhalov goto ret;
109*16d86563SAlexander Pyhalov }
110*16d86563SAlexander Pyhalov } else { /* input fragment of Kanji */
111*16d86563SAlexander Pyhalov UNGET();
112*16d86563SAlexander Pyhalov errno = EINVAL;
113*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
114*16d86563SAlexander Pyhalov goto ret;
115*16d86563SAlexander Pyhalov }
116*16d86563SAlexander Pyhalov } else if (ic == SS2) { /* Kana starts */
117*16d86563SAlexander Pyhalov errno = EILSEQ;
118*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
119*16d86563SAlexander Pyhalov goto ret;
120*16d86563SAlexander Pyhalov } else if (ic == SS3) { /* JISX0212 starts */
121*16d86563SAlexander Pyhalov if (ileft >= EUCW3) {
122*16d86563SAlexander Pyhalov if (ISCS3(*ip) && ISCS3(*(ip + 1))) {
123*16d86563SAlexander Pyhalov if (oleft < JISW3) {
124*16d86563SAlexander Pyhalov UNGET();
125*16d86563SAlexander Pyhalov errno = E2BIG;
126*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
127*16d86563SAlexander Pyhalov goto ret;
128*16d86563SAlexander Pyhalov }
129*16d86563SAlexander Pyhalov stat = ST_INCS3;
130*16d86563SAlexander Pyhalov continue;
131*16d86563SAlexander Pyhalov } else {
132*16d86563SAlexander Pyhalov errno = EILSEQ;
133*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
134*16d86563SAlexander Pyhalov goto ret;
135*16d86563SAlexander Pyhalov }
136*16d86563SAlexander Pyhalov } else { /* input fragment of JISX0212 */
137*16d86563SAlexander Pyhalov UNGET();
138*16d86563SAlexander Pyhalov errno = EINVAL;
139*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
140*16d86563SAlexander Pyhalov goto ret;
141*16d86563SAlexander Pyhalov }
142*16d86563SAlexander Pyhalov } else {
143*16d86563SAlexander Pyhalov UNGET();
144*16d86563SAlexander Pyhalov errno = EILSEQ;
145*16d86563SAlexander Pyhalov retval = (size_t)ERR_RETURN;
146*16d86563SAlexander Pyhalov goto ret;
147*16d86563SAlexander Pyhalov }
148*16d86563SAlexander Pyhalov }
149*16d86563SAlexander Pyhalov retval = ileft;
150*16d86563SAlexander Pyhalov ret:
151*16d86563SAlexander Pyhalov *inbuf = (char *)ip;
152*16d86563SAlexander Pyhalov *inbytesleft = ileft;
153*16d86563SAlexander Pyhalov ret2:
154*16d86563SAlexander Pyhalov *outbuf = op;
155*16d86563SAlexander Pyhalov *outbytesleft = oleft;
156*16d86563SAlexander Pyhalov
157*16d86563SAlexander Pyhalov return (retval);
158*16d86563SAlexander Pyhalov }
159