/* * Copyright (c) 2003-2004, Artem B. Bityuckiy * 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. */ /* FUNCTION <>, <>, <>---charset conversion routines INDEX iconv INDEX iconv_open INDEX iconv_close INDEX _iconv_r INDEX _iconv_open_r INDEX _iconv_close_r SYNOPSIS #include iconv_t iconv_open (const char *<[to]>, const char *<[from]>); int iconv_close (iconv_t <[cd]>); size_t iconv (iconv_t <[cd]>, char **restrict <[inbuf]>, size_t *restrict <[inbytesleft]>, char **restrict <[outbuf]>, size_t *restrict <[outbytesleft]>); iconv_t _iconv_open_r (struct _reent *<[rptr]>, const char *<[to]>, const char *<[from]>); int _iconv_close_r (struct _reent *<[rptr]>, iconv_t <[cd]>); size_t _iconv_r (struct _reent *<[rptr]>, iconv_t <[cd]>, const char **<[inbuf]>, size_t *<[inbytesleft]>, char **<[outbuf]>, size_t *<[outbytesleft]>); DESCRIPTION The function <> converts characters from <[in]> which are in one encoding to characters of another encoding, outputting them to <[out]>. The value <[inleft]> specifies the number of input bytes to convert whereas the value <[outleft]> specifies the size remaining in the <[out]> buffer. The conversion descriptor <[cd]> specifies the conversion being performed and is created via <>. An <> conversion stops if: the input bytes are exhausted, the output buffer is full, an invalid input character sequence occurs, or the conversion specifier is invalid. The function <> is used to specify a conversion from one encoding: <[from]> to another: <[to]>. The result of the call is to create a conversion specifier that can be used with <>. The function <> is used to close a conversion specifier after it is no longer needed. The <<_iconv_r>>, <<_iconv_open_r>>, and <<_iconv_close_r>> functions are reentrant versions of <>, <>, and <>, respectively. An additional reentrancy struct pointer: <[rptr]> is passed to properly set <>. RETURNS The <> function returns the number of non-identical conversions performed. If an error occurs, (size_t)-1 is returned and <> is set appropriately. The values of <[inleft]>, <[in]>, <[out]>, and <[outleft]> are modified to indicate how much input was processed and how much output was created. The <> function returns either a valid conversion specifier or (iconv_t)-1 to indicate failure. If failure occurs, <> is set appropriately. The <> function returns 0 on success or -1 on failure. If failure occurs <> is set appropriately. PORTABILITY <>, <>, and <> are non-ANSI and are specified by the Single Unix specification. No supporting OS subroutine calls are required. */ #include <_ansi.h> #include #include #include #include #include #include #include #include #include "local.h" #include "conv.h" #include "ucsconv.h" /* * iconv interface functions as specified by Single Unix specification. */ iconv_t _DEFUN(iconv_open, (to, from), _CONST char *to _AND _CONST char *from) { return _iconv_open_r (_REENT, to, from); } size_t _DEFUN(iconv, (cd, inbuf, inbytesleft, outbuf, outbytesleft), iconv_t cd _AND char **__restrict inbuf _AND size_t *__restrict inbytesleft _AND char **__restrict outbuf _AND size_t *__restrict outbytesleft) { return _iconv_r (_REENT, cd, (_CONST char **) inbuf, inbytesleft, outbuf, outbytesleft); } int _DEFUN(iconv_close, (cd), iconv_t cd) { return _iconv_close_r (_REENT, cd); } #ifndef _REENT_ONLY iconv_t _DEFUN(_iconv_open_r, (rptr, to, from), struct _reent *rptr _AND _CONST char *to _AND _CONST char *from) { iconv_conversion_t *ic; if (to == NULL || from == NULL || *to == '\0' || *from == '\0') return (iconv_t)-1; if ((to = (_CONST char *)_iconv_resolve_encoding_name (rptr, to)) == NULL) return (iconv_t)-1; if ((from = (_CONST char *)_iconv_resolve_encoding_name (rptr, from)) == NULL) { _free_r (rptr, (_VOID_PTR)to); return (iconv_t)-1; } ic = (iconv_conversion_t *)_malloc_r (rptr, sizeof (iconv_conversion_t)); if (ic == NULL) return (iconv_t)-1; /* Select which conversion type to use */ if (strcmp (from, to) == 0) { /* Use null conversion */ ic->handlers = &_iconv_null_conversion_handlers; ic->data = ic->handlers->open (rptr, to, from); } else { /* Use UCS-based conversion */ ic->handlers = &_iconv_ucs_conversion_handlers; ic->data = ic->handlers->open (rptr, to, from); } _free_r (rptr, (_VOID_PTR)to); _free_r (rptr, (_VOID_PTR)from); if (ic->data == NULL) { _free_r (rptr, (_VOID_PTR)ic); return (iconv_t)-1; } return (_VOID_PTR)ic; } size_t _DEFUN(_iconv_r, (rptr, cd, inbuf, inbytesleft, outbuf, outbytesleft), struct _reent *rptr _AND iconv_t cd _AND _CONST char **inbuf _AND size_t *inbytesleft _AND char **outbuf _AND size_t *outbytesleft) { iconv_conversion_t *ic = (iconv_conversion_t *)cd; if ((_VOID_PTR)cd == NULL || cd == (iconv_t)-1 || ic->data == NULL || (ic->handlers != &_iconv_null_conversion_handlers && ic->handlers != &_iconv_ucs_conversion_handlers)) { __errno_r (rptr) = EBADF; return (size_t)-1; } if (inbuf == NULL || *inbuf == NULL) { mbstate_t state_null = ICONV_ZERO_MB_STATE_T; if (!ic->handlers->is_stateful(ic->data, 1)) return (size_t)0; if (outbuf == NULL || *outbuf == NULL) { /* Reset shift state */ ic->handlers->set_state (ic->data, &state_null, 1); return (size_t)0; } if (outbytesleft != NULL) { mbstate_t state_save = ICONV_ZERO_MB_STATE_T; /* Save current shift state */ ic->handlers->get_state (ic->data, &state_save, 1); /* Reset shift state */ ic->handlers->set_state (ic->data, &state_null, 1); /* Get initial shift state sequence and it's length */ ic->handlers->get_state (ic->data, &state_null, 1); if (*outbytesleft >= state_null.__count) { memcpy ((_VOID_PTR)(*outbuf), (_VOID_PTR)&state_null, state_null.__count); *outbuf += state_null.__count; *outbytesleft -= state_null.__count; return (size_t)0; } /* Restore shift state if output buffer is too small */ ic->handlers->set_state (ic->data, &state_save, 1); } __errno_r (rptr) = E2BIG; return (size_t)-1; } if (*inbytesleft == 0) { __errno_r (rptr) = EINVAL; return (size_t)-1; } if (*outbytesleft == 0 || *outbuf == NULL) { __errno_r (rptr) = E2BIG; return (size_t)-1; } return ic->handlers->convert (rptr, ic->data, (_CONST unsigned char**)inbuf, inbytesleft, (unsigned char**)outbuf, outbytesleft, 0); } int _DEFUN(_iconv_close_r, (rptr, cd), struct _reent *rptr _AND iconv_t cd) { int res; iconv_conversion_t *ic = (iconv_conversion_t *)cd; if ((_VOID_PTR)cd == NULL || cd == (iconv_t)-1 || ic->data == NULL || (ic->handlers != &_iconv_null_conversion_handlers && ic->handlers != &_iconv_ucs_conversion_handlers)) { __errno_r (rptr) = EBADF; return -1; } res = (int)ic->handlers->close (rptr, ic->data); _free_r (rptr, (_VOID_PTR)cd); return res; } #endif /* !_REENT_ONLY */