1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
/*-
* Copyright (c) 1999,2000
* Konstantin Chuguev. All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
* iconv (Charset Conversion Library) v2.0
*/
#ifdef ENABLE_ICONV
#include <_ansi.h>
#include <sys/types.h>
#include <assert.h>
#include <errno.h>
#include <stdlib.h>
#include <reent.h>
#include "local.h"
static int
_DEFUN(table_init, (rptr, data, name, desc_data),
struct _reent *rptr _AND
_VOID_PTR *data _AND
_CONST char *name _AND
_CONST _VOID_PTR desc_data)
{
int res;
struct iconv_ccs *ccs = _malloc_r(rptr, sizeof(struct iconv_ccs));
if (ccs == NULL)
return __errno_r(rptr);
res = iconv_ccs_init(rptr, ccs, name);
if (res)
_free_r(rptr, ccs);
else
(struct iconv_ccs *)(*data) = ccs;
return res;
}
static int
_DEFUN(table_close, (rptr, data),
struct _reent *rptr _AND
_VOID_PTR data)
{
int res = 0;
if (data != NULL)
res = ((struct iconv_ccs *)data)->close(rptr, (struct iconv_ccs *)data);
_free_r(rptr, data);
return res;
}
static ssize_t
_DEFUN(convert_from_ucs, (ces, in, outbuf, outbytesleft),
struct iconv_ces *ces _AND
ucs_t in _AND
unsigned char **outbuf _AND
size_t *outbytesleft)
{
ucs_t res;
size_t bytes;
if (in == UCS_CHAR_NONE)
return 1; /* No state reinitialization for table charsets */
if (iconv_char32bit(in))
return -1;
res = ICONV_CCS_CONVERT_FROM_UCS((struct iconv_ccs *)(ces->data), in);
if (res == UCS_CHAR_INVALID)
return -1; /* No character in output charset */
bytes = res & 0xFF00 ? 2 : 1;
if (*outbytesleft < bytes)
return 0; /* No space in output buffer */
if (bytes == 2)
*(*outbuf)++ = (res >> 8) & 0xFF;
*(*outbuf)++ = res & 0xFF;
*outbytesleft -= bytes;
return 1;
}
static ucs_t
_DEFUN(convert_to_ucs, (ces, inbuf, inbytesleft),
struct iconv_ces *ces _AND
_CONST unsigned char **inbuf _AND
size_t *inbytesleft)
{
struct iconv_ccs *ccsd = (struct iconv_ccs *)(ces->data);
unsigned char byte = *(*inbuf);
ucs_t res = ICONV_CCS_CONVERT_TO_UCS(ccsd, byte);
size_t bytes = (res == UCS_CHAR_INVALID && ccsd->nbits > 8) ? 2 : 1;
if (*inbytesleft < bytes)
return UCS_CHAR_NONE; /* Not enough bytes in the input buffer */
if (bytes == 2)
res = ICONV_CCS_CONVERT_TO_UCS(ccsd, (byte << 8) | (* ++(*inbuf)));
(*inbuf) ++;
*inbytesleft -= bytes;
return res;
}
_CONST struct iconv_ces_desc iconv_ces_table_driven = {
table_init,
table_close,
iconv_ces_reset_null,
convert_from_ucs,
convert_to_ucs,
NULL
};
#endif /* #ifdef ENABLE_ICONV */
|
