URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-stable/] [newlib-1.18.0/] [newlib/] [libc/] [iconv/] [ces/] [ucs-4.c] - Rev 829
Compare with Previous | Blame | View Log
/* * 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. */ #include "cesbi.h" #if defined (ICONV_TO_UCS_CES_UCS_4) \ || defined (ICONV_FROM_UCS_CES_UCS_4) #include <_ansi.h> #include <reent.h> #include <stdlib.h> #include <string.h> #include <sys/types.h> #include "../lib/local.h" #include "../lib/ucsconv.h" #include "../lib/endian.h" /* * BOM isn't supported. UCS-4 is Big Endian. Bad codes are rejected. * Bad codes: 0x0000FFFF, 0x0000FFFE, 0x0000D800-0x0000DFFF, * 0x7FFFFFFF-0xFFFFFFFF. */ #define UCS_4_BIG_ENDIAN 0 #define UCS_4_LITTLE_ENDIAN 1 #define UCS_4 "ucs_4" #define UCS_4BE "ucs_4be" #define UCS_4LE "ucs_4le" static _VOID_PTR _DEFUN(ucs_4_init, (rptr, encoding), struct _reent *rptr _AND _CONST char *encoding) { int *data; if ((data = (int *)_malloc_r (rptr, sizeof(int))) == NULL) return (_VOID_PTR)NULL; if (strcmp (encoding, UCS_4LE) == 0) *data = UCS_4_LITTLE_ENDIAN; else *data = UCS_4_BIG_ENDIAN; return (_VOID_PTR)data; } static size_t _DEFUN(ucs_4_close, (rptr, data), struct _reent *rptr _AND _VOID_PTR data) { _free_r(rptr, data); return 0; } #if defined (ICONV_FROM_UCS_CES_UCS_4) static size_t _DEFUN(ucs_4_convert_from_ucs, (data, in, outbuf, outbytesleft), _VOID_PTR data _AND ucs4_t in _AND unsigned char **outbuf _AND size_t *outbytesleft) { if ((in >= 0x0000D800 && in <= 0x0000DFFF) /* Surrogate character */ || in > 0x7FFFFFFF || in == 0x0000FFFF || in == 0x0000FFFE) return (size_t)ICONV_CES_INVALID_CHARACTER; if (*outbytesleft < sizeof (ucs4_t)) return (size_t)ICONV_CES_NOSPACE; if (*((int *)data) == UCS_4_BIG_ENDIAN) *((ucs4_t *)(*outbuf)) = ICONV_HTOBEL (in); else *((ucs4_t *)(*outbuf)) = ICONV_HTOLEL (in); *outbuf += sizeof (ucs4_t); *outbytesleft -= sizeof (ucs4_t); return sizeof (ucs4_t); } #endif /* ICONV_FROM_UCS_CES_UCS_4 */ #if defined (ICONV_TO_UCS_CES_UCS_4) static ucs4_t _DEFUN(ucs_4_convert_to_ucs, (data, inbuf, inbytesleft), _VOID_PTR data _AND _CONST unsigned char **inbuf _AND size_t *inbytesleft) { ucs4_t res; if (*inbytesleft < sizeof (ucs4_t)) return (ucs4_t)ICONV_CES_BAD_SEQUENCE; if (*((int *)data) == UCS_4_BIG_ENDIAN) res = ICONV_BETOHL (*((ucs4_t *)(*inbuf))); else res = ICONV_LETOHL (*((ucs4_t *)(*inbuf))); if ((res >= 0x0000D800 && res <= 0x0000DFFF) /* Surrogate character */ || res > 0x7FFFFFFF || res == 0x0000FFFF || res == 0x0000FFFE) return (ucs4_t)ICONV_CES_INVALID_CHARACTER; *inbytesleft -= sizeof (ucs4_t); *inbuf += sizeof(ucs4_t); return res; } #endif /* ICONV_TO_UCS_CES_UCS_4 */ static int _DEFUN(ucs_4_get_mb_cur_max, (data), _VOID_PTR data) { return 4; } #if defined (ICONV_TO_UCS_CES_UCS_4) _CONST iconv_to_ucs_ces_handlers_t _iconv_to_ucs_ces_handlers_ucs_4 = { ucs_4_init, ucs_4_close, ucs_4_get_mb_cur_max, NULL, NULL, NULL, ucs_4_convert_to_ucs }; #endif #if defined (ICONV_FROM_UCS_CES_UCS_4) _CONST iconv_from_ucs_ces_handlers_t _iconv_from_ucs_ces_handlers_ucs_4 = { ucs_4_init, ucs_4_close, ucs_4_get_mb_cur_max, NULL, NULL, NULL, ucs_4_convert_from_ucs }; #endif #endif /* ICONV_TO_UCS_CES_UCS_4 || ICONV_FROM_UCS_CES_UCS_4 */