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) 2008, by Sun Microsystems, Inc.
23*16d86563SAlexander Pyhalov * All rights reserved.
24*16d86563SAlexander Pyhalov */
25*16d86563SAlexander Pyhalov
26*16d86563SAlexander Pyhalov #include <stdio.h>
27*16d86563SAlexander Pyhalov #include <errno.h>
28*16d86563SAlexander Pyhalov #include <stdlib.h>
29*16d86563SAlexander Pyhalov #include <sys/types.h>
30*16d86563SAlexander Pyhalov #define __NEED_VISCII_2_UNI__
31*16d86563SAlexander Pyhalov #include <unicode_viscii.h> /* Unicode to viscii mapping table */
32*16d86563SAlexander Pyhalov #include "common_defs.h"
33*16d86563SAlexander Pyhalov
34*16d86563SAlexander Pyhalov
35*16d86563SAlexander Pyhalov typedef struct _icv_state {
36*16d86563SAlexander Pyhalov char keepc[4]; /* maximum # byte of UCS code */
37*16d86563SAlexander Pyhalov int _errno; /* internal errno */
38*16d86563SAlexander Pyhalov } _iconv_st;
39*16d86563SAlexander Pyhalov
40*16d86563SAlexander Pyhalov
41*16d86563SAlexander Pyhalov
42*16d86563SAlexander Pyhalov /*
43*16d86563SAlexander Pyhalov * Open; called from iconv_open()
44*16d86563SAlexander Pyhalov */
45*16d86563SAlexander Pyhalov void *
_icv_open()46*16d86563SAlexander Pyhalov _icv_open()
47*16d86563SAlexander Pyhalov {
48*16d86563SAlexander Pyhalov _iconv_st *st;
49*16d86563SAlexander Pyhalov
50*16d86563SAlexander Pyhalov if ((st = (_iconv_st *)malloc(sizeof(_iconv_st))) == NULL) {
51*16d86563SAlexander Pyhalov errno = ENOMEM;
52*16d86563SAlexander Pyhalov return ((void *) -1);
53*16d86563SAlexander Pyhalov }
54*16d86563SAlexander Pyhalov
55*16d86563SAlexander Pyhalov st->_errno = 0;
56*16d86563SAlexander Pyhalov return ((void *) st);
57*16d86563SAlexander Pyhalov }
58*16d86563SAlexander Pyhalov
59*16d86563SAlexander Pyhalov
60*16d86563SAlexander Pyhalov /*
61*16d86563SAlexander Pyhalov * Close; called from iconv_close()
62*16d86563SAlexander Pyhalov */
63*16d86563SAlexander Pyhalov void
_icv_close(_iconv_st * st)64*16d86563SAlexander Pyhalov _icv_close(_iconv_st *st)
65*16d86563SAlexander Pyhalov {
66*16d86563SAlexander Pyhalov if (!st)
67*16d86563SAlexander Pyhalov errno = EBADF;
68*16d86563SAlexander Pyhalov else
69*16d86563SAlexander Pyhalov free(st);
70*16d86563SAlexander Pyhalov }
71*16d86563SAlexander Pyhalov
72*16d86563SAlexander Pyhalov
73*16d86563SAlexander Pyhalov /*
74*16d86563SAlexander Pyhalov * Actual conversion; called from iconv()
75*16d86563SAlexander Pyhalov */
76*16d86563SAlexander Pyhalov size_t
_icv_iconv(_iconv_st * st,char ** inbuf,size_t * inbytesleft,char ** outbuf,size_t * outbytesleft)77*16d86563SAlexander Pyhalov _icv_iconv(_iconv_st *st, char **inbuf, size_t *inbytesleft,
78*16d86563SAlexander Pyhalov char **outbuf, size_t *outbytesleft)
79*16d86563SAlexander Pyhalov {
80*16d86563SAlexander Pyhalov
81*16d86563SAlexander Pyhalov #ifdef DEBUG
82*16d86563SAlexander Pyhalov fprintf(stderr, "========== iconv(): viscii -->UTF-8 ==========\n");
83*16d86563SAlexander Pyhalov #endif
84*16d86563SAlexander Pyhalov if (st == NULL) {
85*16d86563SAlexander Pyhalov errno = EBADF;
86*16d86563SAlexander Pyhalov return ((size_t) -1);
87*16d86563SAlexander Pyhalov }
88*16d86563SAlexander Pyhalov
89*16d86563SAlexander Pyhalov if (inbuf == NULL || *inbuf == NULL) { /* Reset request. */
90*16d86563SAlexander Pyhalov st->_errno = 0;
91*16d86563SAlexander Pyhalov return ((size_t) 0);
92*16d86563SAlexander Pyhalov }
93*16d86563SAlexander Pyhalov
94*16d86563SAlexander Pyhalov st->_errno = 0; /* reset internal errno */
95*16d86563SAlexander Pyhalov errno = 0; /* reset external errno */
96*16d86563SAlexander Pyhalov
97*16d86563SAlexander Pyhalov /* convert viscii encoding to UTF-8 */
98*16d86563SAlexander Pyhalov while (*inbytesleft > 0 && *outbytesleft > 0) {
99*16d86563SAlexander Pyhalov unsigned long uni = 0;
100*16d86563SAlexander Pyhalov
101*16d86563SAlexander Pyhalov viscii_2_uni((unsigned char*)*inbuf, &uni);
102*16d86563SAlexander Pyhalov if (uni < 0x80) {
103*16d86563SAlexander Pyhalov *(*outbuf)++ = (char)uni;
104*16d86563SAlexander Pyhalov (*outbytesleft) -= 1;
105*16d86563SAlexander Pyhalov } else if (uni >= 0x0080 && uni <= 0x07ff) {
106*16d86563SAlexander Pyhalov if (*outbytesleft < 2 ) {
107*16d86563SAlexander Pyhalov errno = E2BIG;
108*16d86563SAlexander Pyhalov return((size_t)-1);
109*16d86563SAlexander Pyhalov }
110*16d86563SAlexander Pyhalov *(*outbuf)++ = (char)((uni >> 6) & 0x1f) | 0xc0;
111*16d86563SAlexander Pyhalov *(*outbuf)++ = (char)(uni & 0x3f) | 0x80;
112*16d86563SAlexander Pyhalov *outbytesleft -= 2;
113*16d86563SAlexander Pyhalov } else if (uni >= 0x0800 && uni <= 0xffff) {
114*16d86563SAlexander Pyhalov if (*outbytesleft < 3) {
115*16d86563SAlexander Pyhalov errno = E2BIG;
116*16d86563SAlexander Pyhalov return((size_t)-1);
117*16d86563SAlexander Pyhalov }
118*16d86563SAlexander Pyhalov *(*outbuf)++ = (char)((uni >> 12) & 0xf) | 0xe0;
119*16d86563SAlexander Pyhalov *(*outbuf)++ = (char)((uni >>6) & 0x3f) | 0x80;
120*16d86563SAlexander Pyhalov *(*outbuf)++ = (char)(uni & 0x3f) | 0x80;
121*16d86563SAlexander Pyhalov *outbytesleft -= 3;
122*16d86563SAlexander Pyhalov }
123*16d86563SAlexander Pyhalov
124*16d86563SAlexander Pyhalov (*inbuf)++;
125*16d86563SAlexander Pyhalov (*inbytesleft)--;
126*16d86563SAlexander Pyhalov
127*16d86563SAlexander Pyhalov }
128*16d86563SAlexander Pyhalov
129*16d86563SAlexander Pyhalov if ( *inbytesleft > 0 && *outbytesleft <= 0 ) {
130*16d86563SAlexander Pyhalov errno = E2BIG;
131*16d86563SAlexander Pyhalov return ((size_t)-1);
132*16d86563SAlexander Pyhalov }
133*16d86563SAlexander Pyhalov
134*16d86563SAlexander Pyhalov return ((size_t)(*inbytesleft));
135*16d86563SAlexander Pyhalov }
136