1 /*	$NetBSD: iconv.c,v 1.13 2012/01/20 16:31:29 joerg Exp $	*/
2 
3 /*-
4  * Copyright (c)2003 Citrus Project,
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  */
28 
29 #include <sys/cdefs.h>
30 #if defined(LIBC_SCCS) && !defined(lint)
31 __RCSID("$NetBSD: iconv.c,v 1.13 2012/01/20 16:31:29 joerg Exp $");
32 #endif /* LIBC_SCCS and not lint */
33 
34 #include "namespace.h"
35 #include <assert.h>
36 #include <errno.h>
37 #include <paths.h>
38 #include <sys/queue.h>
39 
40 #include <iconv.h>
41 
42 #ifdef __weak_alias
__weak_alias(iconv,_iconv)43 __weak_alias(iconv, _iconv)
44 __weak_alias(iconv_open, _iconv_open)
45 __weak_alias(iconv_close, _iconv_close)
46 #endif
47 
48 #include <sys/types.h>
49 #include "citrus_types.h"
50 #include "citrus_module.h"
51 #include "citrus_esdb.h"
52 #include "citrus_hash.h"
53 #include "citrus_iconv.h"
54 
55 #define ISBADF(_h_)	(!(_h_) || (_h_) == (iconv_t)-1)
56 
57 
58 iconv_t
59 iconv_open(const char *out, const char *in)
60 {
61 	int ret;
62 	struct _citrus_iconv *handle;
63 
64 	ret = _citrus_iconv_open(&handle, _PATH_ICONV, in, out);
65 	if (ret) {
66 		errno = ret == ENOENT? EINVAL : ret;
67 		return ((iconv_t)-1);
68 	}
69 
70 	return ((iconv_t)(void *)handle);
71 }
72 
73 int
iconv_close(iconv_t handle)74 iconv_close(iconv_t handle)
75 {
76 	if (ISBADF(handle)) {
77 		errno = EBADF;
78 		return (-1);
79 	}
80 
81 	_citrus_iconv_close((struct _citrus_iconv *)(void *)handle);
82 
83 	return (0);
84 }
85 
86 size_t
iconv(iconv_t handle,const char ** in,size_t * szin,char ** out,size_t * szout)87 iconv(iconv_t handle, const char **in, size_t *szin, char **out, size_t *szout)
88 {
89 	int err;
90 	size_t ret;
91 
92 	if (ISBADF(handle)) {
93 		errno = EBADF;
94 		return ((size_t)-1);
95 	}
96 
97 	err = _citrus_iconv_convert(
98 		(struct _citrus_iconv *)(void *)handle, in, szin, out, szout,
99 		0, &ret);
100 	if (err) {
101 		errno = err;
102 		ret = (size_t)-1;
103 	}
104 
105 	return (ret);
106 }
107 
108 size_t
__iconv(iconv_t handle,const char ** in,size_t * szin,char ** out,size_t * szout,u_int32_t flags,size_t * invalids)109 __iconv(iconv_t handle, const char **in, size_t *szin, char **out,
110 	size_t *szout, u_int32_t flags, size_t *invalids)
111 {
112 	int err;
113 	size_t ret;
114 
115 	if (ISBADF(handle)) {
116 		errno = EBADF;
117 		return ((size_t)-1);
118 	}
119 
120 	err = _citrus_iconv_convert(
121 		(struct _citrus_iconv *)(void *)handle, in, szin, out, szout,
122 		flags, &ret);
123 	if (invalids)
124 		*invalids = ret;
125 	if (err) {
126 		errno = err;
127 		ret = (size_t)-1;
128 	}
129 
130 	return (ret);
131 }
132 
133 int
__iconv_get_list(char *** rlist,size_t * rsz)134 __iconv_get_list(char ***rlist, size_t *rsz)
135 {
136 	int ret;
137 
138 	ret = _citrus_esdb_get_list(rlist, rsz);
139 	if (ret) {
140 		errno = ret;
141 		return -1;
142 	}
143 
144 	return 0;
145 }
146 
147 void
__iconv_free_list(char ** list,size_t sz)148 __iconv_free_list(char **list, size_t sz)
149 {
150 	_citrus_esdb_free_list(list, sz);
151 }
152