1 /* $FreeBSD: head/lib/libc/iconv/iconv.c 254273 2013-08-13 07:15:01Z peter $ */
2 /* $NetBSD: iconv.c,v 1.11 2009/03/03 16:22:33 explorer Exp $ */
5 * Copyright (c) 2003 Citrus Project,
6 * Copyright (c) 2009, 2010 Gabor Kovesdan <gabor@FreeBSD.org>,
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 #include <sys/cdefs.h>
32 #include <sys/queue.h>
33 #include <sys/types.h>
44 #include "../citrus/citrus_types.h"
45 #include "../citrus/citrus_module.h"
46 #include "../citrus/citrus_esdb.h"
47 #include "../citrus/citrus_hash.h"
48 #include "../citrus/citrus_iconv.h"
50 #ifdef __LIBICONV_COMPAT
51 __weak_reference(iconv, libiconv);
52 __weak_reference(iconv_open, libiconv_open);
53 __weak_reference(iconv_open_into, libiconv_open_into);
54 __weak_reference(iconv_close, libiconv_close);
55 __weak_reference(iconvlist, libiconvlist);
56 __weak_reference(iconvctl, libiconvctl);
57 __weak_reference(iconv_set_relocation_prefix, libiconv_set_relocation_prefix);
58 __weak_reference(_iconv_version, _libiconv_version);
61 #define ISBADF(_h_) (!(_h_) || (_h_) == (iconv_t)-1)
63 int _iconv_version = _ICONV_VERSION;
65 iconv_t _iconv_open(const char *out, const char *in,
66 struct _citrus_iconv *prealloc);
69 _iconv_open(const char *out, const char *in, struct _citrus_iconv *handle)
71 const char *out_slashes;
76 * Remove anything following a //, as these are options (like
77 * //ignore, //translate, etc) and we just don't handle them.
78 * This is for compatibility with software that uses these
81 out_slashes = strstr(out, "//");
82 if (out_slashes != NULL) {
83 out_noslashes = strndup(out, out_slashes - out);
84 if (out_noslashes == NULL) {
88 ret = _citrus_iconv_open(&handle, in, out_noslashes);
91 ret = _citrus_iconv_open(&handle, in, out);
95 errno = ret == ENOENT ? EINVAL : ret;
99 handle->cv_shared->ci_discard_ilseq = strcasestr(out, "//IGNORE");
100 handle->cv_shared->ci_hooks = NULL;
102 return ((iconv_t)(void *)handle);
106 iconv_open(const char *out, const char *in)
109 return (_iconv_open(out, in, NULL));
113 iconv_open_into(const char *out, const char *in, iconv_allocation_t *ptr)
115 struct _citrus_iconv *handle;
117 handle = (struct _citrus_iconv *)ptr;
118 return ((_iconv_open(out, in, handle) == (iconv_t)-1) ? -1 : 0);
122 iconv_close(iconv_t handle)
125 if (ISBADF(handle)) {
130 _citrus_iconv_close((struct _citrus_iconv *)(void *)handle);
136 iconv(iconv_t handle, const char **in, size_t *szin, char **out, size_t *szout)
141 if (ISBADF(handle)) {
146 err = _citrus_iconv_convert((struct _citrus_iconv *)(void *)handle,
147 in, szin, out, szout, 0, &ret);
157 __iconv(iconv_t handle, const char **in, size_t *szin, char **out,
158 size_t *szout, uint32_t flags, size_t *invalids)
163 if (ISBADF(handle)) {
168 err = _citrus_iconv_convert((struct _citrus_iconv *)(void *)handle,
169 in, szin, out, szout, flags, &ret);
181 __iconv_get_list(char ***rlist, size_t *rsz, bool sorted)
185 ret = _citrus_esdb_get_list(rlist, rsz, sorted);
195 __iconv_free_list(char **list, size_t sz)
198 _citrus_esdb_free_list(list, sz);
202 * GNU-compatibile non-standard interfaces.
205 qsort_helper(const void *first, const void *second)
207 const char * const *s1;
208 const char * const *s2;
212 return (strcmp(*s1, *s2));
216 iconvlist(int (*do_one) (unsigned int, const char * const *,
219 char **list, **names;
220 const char * const *np;
221 char *curitem, *curkey, *slashpos;
227 if (__iconv_get_list(&list, &sz, true))
229 qsort((void *)list, sz, sizeof(char *), qsort_helper);
232 slashpos = strchr(list[i], '/');
233 curkey = (char *)malloc(slashpos - list[i] + 2);
234 names = (char **)malloc(sz * sizeof(char *));
235 if ((curkey == NULL) || (names == NULL)) {
236 __iconv_free_list(list, sz);
239 strlcpy(curkey, list[i], slashpos - list[i] + 1);
240 names[j++] = strdup(curkey);
241 for (; (i < sz) && (memcmp(curkey, list[i], strlen(curkey)) == 0); i++) {
242 slashpos = strchr(list[i], '/');
243 curitem = (char *)malloc(strlen(slashpos) + 1);
244 if (curitem == NULL) {
245 __iconv_free_list(list, sz);
248 strlcpy(curitem, &slashpos[1], strlen(slashpos) + 1);
249 if (strcmp(curkey, curitem) == 0) {
252 names[j++] = strdup(curitem);
254 np = (const char * const *)names;
259 __iconv_free_list(list, sz);
263 *iconv_canonicalize(const char *name)
266 return (_citrus_iconv_canonicalize(name));
270 iconvctl(iconv_t cd, int request, void *argument)
272 struct _citrus_iconv *cv;
273 struct iconv_hooks *hooks;
274 const char *convname;
275 char src[PATH_MAX], *dst;
278 cv = (struct _citrus_iconv *)(void *)cd;
279 hooks = (struct iconv_hooks *)argument;
289 convname = cv->cv_shared->ci_convname;
290 dst = strchr(convname, '/');
292 strlcpy(src, convname, dst - convname + 1);
294 if ((convname == NULL) || (src == NULL) || (dst == NULL))
296 *i = strcmp(src, dst) == 0 ? 1 : 0;
298 case ICONV_GET_TRANSLITERATE:
301 case ICONV_SET_TRANSLITERATE:
302 return ((*i == 1) ? 0 : -1);
303 case ICONV_GET_DISCARD_ILSEQ:
304 *i = cv->cv_shared->ci_discard_ilseq ? 1 : 0;
306 case ICONV_SET_DISCARD_ILSEQ:
307 cv->cv_shared->ci_discard_ilseq = *i;
309 case ICONV_SET_HOOKS:
310 cv->cv_shared->ci_hooks = hooks;
312 case ICONV_SET_FALLBACKS:
322 iconv_set_relocation_prefix(const char *orig_prefix __unused,
323 const char *curr_prefix __unused)