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 (c) 1996 by Sun Microsystems, Inc.
23*16d86563SAlexander Pyhalov  */
24*16d86563SAlexander Pyhalov 
25*16d86563SAlexander Pyhalov 
26*16d86563SAlexander Pyhalov #include <stdlib.h>
27*16d86563SAlexander Pyhalov #include <errno.h>
28*16d86563SAlexander Pyhalov #include <widec.h>
29*16d86563SAlexander Pyhalov #include "common_han.h"
30*16d86563SAlexander Pyhalov #include "euc_utf_api.h"
31*16d86563SAlexander Pyhalov 
32*16d86563SAlexander Pyhalov #define	ESC		0x1B
33*16d86563SAlexander Pyhalov #define	SO		0x0E
34*16d86563SAlexander Pyhalov #define	SI		0x0F
35*16d86563SAlexander Pyhalov 
36*16d86563SAlexander Pyhalov typedef struct __conv_desc {
37*16d86563SAlexander Pyhalov 	enum { NOT_DEFINED_YET, KSC5601 }	designator;
38*16d86563SAlexander Pyhalov 	enum { ASCII, HANGUL }	state;
39*16d86563SAlexander Pyhalov } _conv_desc;
40*16d86563SAlexander Pyhalov 
41*16d86563SAlexander Pyhalov /****  _ I C V _ O P E N  ****/
42*16d86563SAlexander Pyhalov 
_icv_open()43*16d86563SAlexander Pyhalov void* _icv_open()
44*16d86563SAlexander Pyhalov {
45*16d86563SAlexander Pyhalov 	_conv_desc* cd = (_conv_desc*)malloc(sizeof(_conv_desc));
46*16d86563SAlexander Pyhalov 
47*16d86563SAlexander Pyhalov 	if (cd == (_conv_desc*)NULL)
48*16d86563SAlexander Pyhalov 	{
49*16d86563SAlexander Pyhalov 		errno = ENOMEM;
50*16d86563SAlexander Pyhalov 		return((void*)-1);
51*16d86563SAlexander Pyhalov 	}
52*16d86563SAlexander Pyhalov 
53*16d86563SAlexander Pyhalov 	cd->designator = NOT_DEFINED_YET;
54*16d86563SAlexander Pyhalov 	cd->state = ASCII;
55*16d86563SAlexander Pyhalov 
56*16d86563SAlexander Pyhalov 	return((void*)cd);
57*16d86563SAlexander Pyhalov }  /* end of int _icv_open(). */
58*16d86563SAlexander Pyhalov 
59*16d86563SAlexander Pyhalov 
60*16d86563SAlexander Pyhalov /****  _ I C V _ C L O S E  ****/
61*16d86563SAlexander Pyhalov 
_icv_close(_conv_desc * cd)62*16d86563SAlexander Pyhalov void _icv_close(_conv_desc* cd)
63*16d86563SAlexander Pyhalov {
64*16d86563SAlexander Pyhalov 	if (!cd)
65*16d86563SAlexander Pyhalov 		errno = EBADF;
66*16d86563SAlexander Pyhalov 	else
67*16d86563SAlexander Pyhalov 		free((void*)cd);
68*16d86563SAlexander Pyhalov }  /* end of void _icv_close(_conv_desc*). */
69*16d86563SAlexander Pyhalov 
70*16d86563SAlexander Pyhalov 
71*16d86563SAlexander Pyhalov /****  _ I C V _ I C O N V  ****/
72*16d86563SAlexander Pyhalov 
_icv_iconv(_conv_desc * cd,char ** inbuf,size_t * inbufleft,char ** outbuf,size_t * outbufleft)73*16d86563SAlexander Pyhalov size_t _icv_iconv(_conv_desc* cd, char** inbuf, size_t* inbufleft,
74*16d86563SAlexander Pyhalov 			char** outbuf, size_t* outbufleft)
75*16d86563SAlexander Pyhalov {
76*16d86563SAlexander Pyhalov 	size_t		ret_val = 0;
77*16d86563SAlexander Pyhalov 	unsigned char*	ib;
78*16d86563SAlexander Pyhalov 	unsigned char*	ob;
79*16d86563SAlexander Pyhalov 	unsigned char*	ibtail;
80*16d86563SAlexander Pyhalov 	unsigned char*	obtail;
81*16d86563SAlexander Pyhalov 
82*16d86563SAlexander Pyhalov 	if (!cd)
83*16d86563SAlexander Pyhalov 	{
84*16d86563SAlexander Pyhalov 		errno = EBADF;
85*16d86563SAlexander Pyhalov 		return((size_t)-1);
86*16d86563SAlexander Pyhalov 	}
87*16d86563SAlexander Pyhalov 
88*16d86563SAlexander Pyhalov 	if (!inbuf || !(*inbuf))
89*16d86563SAlexander Pyhalov 	{
90*16d86563SAlexander Pyhalov 		cd->designator = NOT_DEFINED_YET;
91*16d86563SAlexander Pyhalov 		cd->state = ASCII;
92*16d86563SAlexander Pyhalov 		return((size_t)0);
93*16d86563SAlexander Pyhalov 	}
94*16d86563SAlexander Pyhalov 
95*16d86563SAlexander Pyhalov 	ib = (unsigned char*)*inbuf;
96*16d86563SAlexander Pyhalov 	ob = (unsigned char*)*outbuf;
97*16d86563SAlexander Pyhalov 	ibtail = ib + *inbufleft;
98*16d86563SAlexander Pyhalov 	obtail = ob + *outbufleft;
99*16d86563SAlexander Pyhalov 
100*16d86563SAlexander Pyhalov 	while (ib < ibtail)
101*16d86563SAlexander Pyhalov 	{
102*16d86563SAlexander Pyhalov 		if (cd->designator == KSC5601)
103*16d86563SAlexander Pyhalov 		{
104*16d86563SAlexander Pyhalov 			hcode_type euc_code, utf_code;
105*16d86563SAlexander Pyhalov 
106*16d86563SAlexander Pyhalov 			if (*ib == SI)
107*16d86563SAlexander Pyhalov 			{
108*16d86563SAlexander Pyhalov 				cd->state = ASCII;
109*16d86563SAlexander Pyhalov 				ib++;
110*16d86563SAlexander Pyhalov 				continue;
111*16d86563SAlexander Pyhalov 			}
112*16d86563SAlexander Pyhalov 			else if (*ib == SO)
113*16d86563SAlexander Pyhalov 			{
114*16d86563SAlexander Pyhalov 				cd->state = HANGUL;
115*16d86563SAlexander Pyhalov 				ib++;
116*16d86563SAlexander Pyhalov 				continue;
117*16d86563SAlexander Pyhalov 			}
118*16d86563SAlexander Pyhalov 			else if ((*ib == ' ' && cd->state == HANGUL) ||
119*16d86563SAlexander Pyhalov 				 cd->state == ASCII)
120*16d86563SAlexander Pyhalov 			{
121*16d86563SAlexander Pyhalov 				if (ob >= obtail)
122*16d86563SAlexander Pyhalov 				{
123*16d86563SAlexander Pyhalov 					errno = E2BIG;
124*16d86563SAlexander Pyhalov 					ret_val = (size_t)-1;
125*16d86563SAlexander Pyhalov 					break;
126*16d86563SAlexander Pyhalov 				}
127*16d86563SAlexander Pyhalov 				*ob++ = *ib++;
128*16d86563SAlexander Pyhalov 				continue;
129*16d86563SAlexander Pyhalov 			}
130*16d86563SAlexander Pyhalov 
131*16d86563SAlexander Pyhalov 			/* Pure KS C 5601 Wansung code */
132*16d86563SAlexander Pyhalov 			if ((ibtail - ib) < 2)
133*16d86563SAlexander Pyhalov 			{
134*16d86563SAlexander Pyhalov 				errno = EINVAL;
135*16d86563SAlexander Pyhalov 				ret_val = (size_t)-1;
136*16d86563SAlexander Pyhalov 				break;
137*16d86563SAlexander Pyhalov 			}
138*16d86563SAlexander Pyhalov 
139*16d86563SAlexander Pyhalov 			if (*ib < 0x21 || *ib > 0x7E || *(ib + 1) < 0x21 ||
140*16d86563SAlexander Pyhalov 			    *(ib + 1) == 0x7F)
141*16d86563SAlexander Pyhalov 			{
142*16d86563SAlexander Pyhalov 				errno = EILSEQ;
143*16d86563SAlexander Pyhalov 				ret_val = (size_t)-1;
144*16d86563SAlexander Pyhalov 				break;
145*16d86563SAlexander Pyhalov 			}
146*16d86563SAlexander Pyhalov 
147*16d86563SAlexander Pyhalov 			euc_code.code = 0;
148*16d86563SAlexander Pyhalov 			euc_code.byte.byte3 = *ib;
149*16d86563SAlexander Pyhalov 			euc_code.byte.byte4 = *(ib + 1);
150*16d86563SAlexander Pyhalov 			euc_code.wansung.msb1 = 1;
151*16d86563SAlexander Pyhalov 			euc_code.wansung.msb2 = 1;
152*16d86563SAlexander Pyhalov 
153*16d86563SAlexander Pyhalov 			utf_code = _wansung_to_utf8(euc_code);
154*16d86563SAlexander Pyhalov 
155*16d86563SAlexander Pyhalov 			if (utf_code.code != 0)
156*16d86563SAlexander Pyhalov 			{
157*16d86563SAlexander Pyhalov 				if ((obtail - ob) < 3)
158*16d86563SAlexander Pyhalov 					{
159*16d86563SAlexander Pyhalov 						errno = E2BIG;
160*16d86563SAlexander Pyhalov 						ret_val = (size_t)-1;
161*16d86563SAlexander Pyhalov 						break;
162*16d86563SAlexander Pyhalov 					}
163*16d86563SAlexander Pyhalov 				/* UTF8 code from 2 bytes is always 3 bytes */
164*16d86563SAlexander Pyhalov 				*ob++ = (char)utf_code.byte.byte2;
165*16d86563SAlexander Pyhalov 				*ob++ = (char)utf_code.byte.byte3;
166*16d86563SAlexander Pyhalov 				*ob++ = (char)utf_code.byte.byte4;
167*16d86563SAlexander Pyhalov 			}
168*16d86563SAlexander Pyhalov 			else  /* FAILED - this means input char isn't belong to
169*16d86563SAlexander Pyhalov 			       *	  input codeset. */
170*16d86563SAlexander Pyhalov 			{
171*16d86563SAlexander Pyhalov 				errno = EILSEQ;
172*16d86563SAlexander Pyhalov 				ret_val = (size_t)-1;
173*16d86563SAlexander Pyhalov 				break;
174*16d86563SAlexander Pyhalov 			}
175*16d86563SAlexander Pyhalov 			ib += 2;
176*16d86563SAlexander Pyhalov 
177*16d86563SAlexander Pyhalov 		}
178*16d86563SAlexander Pyhalov 		else
179*16d86563SAlexander Pyhalov 		{
180*16d86563SAlexander Pyhalov 			if (*ib == ESC)
181*16d86563SAlexander Pyhalov 			{
182*16d86563SAlexander Pyhalov 				if ((ibtail - ib) < 4)
183*16d86563SAlexander Pyhalov 				{
184*16d86563SAlexander Pyhalov 					errno = EINVAL;
185*16d86563SAlexander Pyhalov 					ret_val = (size_t)-1;
186*16d86563SAlexander Pyhalov 					break;
187*16d86563SAlexander Pyhalov 				}
188*16d86563SAlexander Pyhalov 
189*16d86563SAlexander Pyhalov 				if (*(ib + 1) == '$' && *(ib + 2) == ')' &&
190*16d86563SAlexander Pyhalov 				    *(ib + 3) == 'C')
191*16d86563SAlexander Pyhalov 				{
192*16d86563SAlexander Pyhalov 					cd->designator = KSC5601;
193*16d86563SAlexander Pyhalov 					ib += 4;
194*16d86563SAlexander Pyhalov 					continue;
195*16d86563SAlexander Pyhalov 				}
196*16d86563SAlexander Pyhalov 			}
197*16d86563SAlexander Pyhalov 
198*16d86563SAlexander Pyhalov 			if (ob >= obtail)
199*16d86563SAlexander Pyhalov 			{
200*16d86563SAlexander Pyhalov 				errno = E2BIG;
201*16d86563SAlexander Pyhalov 				ret_val = (size_t)-1;
202*16d86563SAlexander Pyhalov 				break;
203*16d86563SAlexander Pyhalov 			}
204*16d86563SAlexander Pyhalov 			*ob++ = *ib++;
205*16d86563SAlexander Pyhalov 		}
206*16d86563SAlexander Pyhalov 	}
207*16d86563SAlexander Pyhalov 
208*16d86563SAlexander Pyhalov 	*inbuf = (char*)ib;
209*16d86563SAlexander Pyhalov 	*inbufleft = ibtail - ib;
210*16d86563SAlexander Pyhalov 	*outbuf = (char*)ob;
211*16d86563SAlexander Pyhalov 	*outbufleft = obtail - ob;
212*16d86563SAlexander Pyhalov 
213*16d86563SAlexander Pyhalov 	return(ret_val);
214*16d86563SAlexander Pyhalov }  /* end of size_t _icv_iconv(_conv_desc*, char**, size_t*, char**, size_t*).*/
215