14776d4e8SJohn Marino /*
24776d4e8SJohn Marino * Copyright 2013 Garrett D'Amore <garrett@damore.org>
34776d4e8SJohn Marino * Copyright 2011 Nexenta Systems, Inc. All rights reserved.
40d5acd74SJohn Marino * Copyright (c) 2002-2004 Tim J. Robbins. All rights reserved.
50d5acd74SJohn Marino * Copyright (c) 1993
60d5acd74SJohn Marino * The Regents of the University of California. All rights reserved.
70d5acd74SJohn Marino *
80d5acd74SJohn Marino * This code is derived from software contributed to Berkeley by
90d5acd74SJohn Marino * Paul Borman at Krystal Technologies.
100d5acd74SJohn Marino *
110d5acd74SJohn Marino * Copyright (c) 2011 The FreeBSD Foundation
120d5acd74SJohn Marino * All rights reserved.
130d5acd74SJohn Marino * Portions of this software were developed by David Chisnall
140d5acd74SJohn Marino * under sponsorship from the FreeBSD Foundation.
150d5acd74SJohn Marino *
160d5acd74SJohn Marino * Redistribution and use in source and binary forms, with or without
170d5acd74SJohn Marino * modification, are permitted provided that the following conditions
180d5acd74SJohn Marino * are met:
190d5acd74SJohn Marino * 1. Redistributions of source code must retain the above copyright
200d5acd74SJohn Marino * notice, this list of conditions and the following disclaimer.
210d5acd74SJohn Marino * 2. Redistributions in binary form must reproduce the above copyright
220d5acd74SJohn Marino * notice, this list of conditions and the following disclaimer in the
230d5acd74SJohn Marino * documentation and/or other materials provided with the distribution.
244776d4e8SJohn Marino * 3. Neither the name of the University nor the names of its contributors
250d5acd74SJohn Marino * may be used to endorse or promote products derived from this software
260d5acd74SJohn Marino * without specific prior written permission.
270d5acd74SJohn Marino *
280d5acd74SJohn Marino * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
290d5acd74SJohn Marino * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
300d5acd74SJohn Marino * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
310d5acd74SJohn Marino * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
320d5acd74SJohn Marino * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
330d5acd74SJohn Marino * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
340d5acd74SJohn Marino * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
350d5acd74SJohn Marino * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
360d5acd74SJohn Marino * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
370d5acd74SJohn Marino * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
380d5acd74SJohn Marino * SUCH DAMAGE.
390d5acd74SJohn Marino *
400d5acd74SJohn Marino * @(#)euc.c 8.1 (Berkeley) 6/4/93
410d5acd74SJohn Marino */
420d5acd74SJohn Marino
430d5acd74SJohn Marino #include <sys/param.h>
440d5acd74SJohn Marino
450d5acd74SJohn Marino #include <errno.h>
460d5acd74SJohn Marino #include <limits.h>
470d5acd74SJohn Marino #include <runetype.h>
480d5acd74SJohn Marino #include <stdlib.h>
490d5acd74SJohn Marino #include <string.h>
500d5acd74SJohn Marino #include <wchar.h>
510d5acd74SJohn Marino #include "mblocal.h"
520d5acd74SJohn Marino
534776d4e8SJohn Marino static size_t _EUC_mbrtowc_impl(wchar_t * __restrict, const char * __restrict,
544776d4e8SJohn Marino size_t, mbstate_t * __restrict, uint8_t, uint8_t, uint8_t, uint8_t);
554776d4e8SJohn Marino static size_t _EUC_wcrtomb_impl(char * __restrict, wchar_t,
564776d4e8SJohn Marino mbstate_t * __restrict, uint8_t, uint8_t, uint8_t, uint8_t);
574776d4e8SJohn Marino
584776d4e8SJohn Marino static size_t _EUC_CN_mbrtowc(wchar_t * __restrict, const char * __restrict,
590d5acd74SJohn Marino size_t, mbstate_t * __restrict);
604776d4e8SJohn Marino static size_t _EUC_JP_mbrtowc(wchar_t * __restrict, const char * __restrict,
614776d4e8SJohn Marino size_t, mbstate_t * __restrict);
624776d4e8SJohn Marino static size_t _EUC_KR_mbrtowc(wchar_t * __restrict, const char * __restrict,
634776d4e8SJohn Marino size_t, mbstate_t * __restrict);
644776d4e8SJohn Marino static size_t _EUC_TW_mbrtowc(wchar_t * __restrict, const char * __restrict,
654776d4e8SJohn Marino size_t, mbstate_t * __restrict);
664776d4e8SJohn Marino
674776d4e8SJohn Marino static size_t _EUC_CN_wcrtomb(char * __restrict, wchar_t,
684776d4e8SJohn Marino mbstate_t * __restrict);
694776d4e8SJohn Marino static size_t _EUC_JP_wcrtomb(char * __restrict, wchar_t,
704776d4e8SJohn Marino mbstate_t * __restrict);
714776d4e8SJohn Marino static size_t _EUC_KR_wcrtomb(char * __restrict, wchar_t,
724776d4e8SJohn Marino mbstate_t * __restrict);
734776d4e8SJohn Marino static size_t _EUC_TW_wcrtomb(char * __restrict, wchar_t,
740d5acd74SJohn Marino mbstate_t * __restrict);
750d5acd74SJohn Marino
764776d4e8SJohn Marino static size_t _EUC_CN_mbsnrtowcs(wchar_t * __restrict,
774776d4e8SJohn Marino const char ** __restrict, size_t, size_t,
784776d4e8SJohn Marino mbstate_t * __restrict);
794776d4e8SJohn Marino static size_t _EUC_JP_mbsnrtowcs(wchar_t * __restrict,
804776d4e8SJohn Marino const char ** __restrict, size_t, size_t,
814776d4e8SJohn Marino mbstate_t * __restrict);
824776d4e8SJohn Marino static size_t _EUC_KR_mbsnrtowcs(wchar_t * __restrict,
834776d4e8SJohn Marino const char ** __restrict, size_t, size_t,
844776d4e8SJohn Marino mbstate_t * __restrict);
854776d4e8SJohn Marino static size_t _EUC_TW_mbsnrtowcs(wchar_t * __restrict,
864776d4e8SJohn Marino const char ** __restrict, size_t, size_t,
874776d4e8SJohn Marino mbstate_t * __restrict);
884776d4e8SJohn Marino
894776d4e8SJohn Marino static size_t _EUC_CN_wcsnrtombs(char * __restrict,
904776d4e8SJohn Marino const wchar_t ** __restrict, size_t, size_t,
914776d4e8SJohn Marino mbstate_t * __restrict);
924776d4e8SJohn Marino static size_t _EUC_JP_wcsnrtombs(char * __restrict,
934776d4e8SJohn Marino const wchar_t ** __restrict, size_t, size_t,
944776d4e8SJohn Marino mbstate_t * __restrict);
954776d4e8SJohn Marino static size_t _EUC_KR_wcsnrtombs(char * __restrict,
964776d4e8SJohn Marino const wchar_t ** __restrict, size_t, size_t,
974776d4e8SJohn Marino mbstate_t * __restrict);
984776d4e8SJohn Marino static size_t _EUC_TW_wcsnrtombs(char * __restrict,
994776d4e8SJohn Marino const wchar_t ** __restrict, size_t, size_t,
1004776d4e8SJohn Marino mbstate_t * __restrict);
1014776d4e8SJohn Marino
1024776d4e8SJohn Marino static int _EUC_mbsinit(const mbstate_t *);
1030d5acd74SJohn Marino
1040d5acd74SJohn Marino typedef struct {
1050d5acd74SJohn Marino wchar_t ch;
1060d5acd74SJohn Marino int set;
1070d5acd74SJohn Marino int want;
1080d5acd74SJohn Marino } _EucState;
1090d5acd74SJohn Marino
1100d5acd74SJohn Marino static int
_EUC_mbsinit(const mbstate_t * ps)1110d5acd74SJohn Marino _EUC_mbsinit(const mbstate_t *ps)
1120d5acd74SJohn Marino {
1130d5acd74SJohn Marino
1140d5acd74SJohn Marino return (ps == NULL || ((const _EucState *)ps)->want == 0);
1150d5acd74SJohn Marino }
1160d5acd74SJohn Marino
1174776d4e8SJohn Marino /*
1184776d4e8SJohn Marino * EUC-CN uses CS0, CS1 and CS2 (4 bytes).
1194776d4e8SJohn Marino */
1204776d4e8SJohn Marino int
_EUC_CN_init(struct xlocale_ctype * l,_RuneLocale * rl)1214776d4e8SJohn Marino _EUC_CN_init(struct xlocale_ctype *l, _RuneLocale *rl)
1220d5acd74SJohn Marino {
1234776d4e8SJohn Marino l->__mbrtowc = _EUC_CN_mbrtowc;
1244776d4e8SJohn Marino l->__wcrtomb = _EUC_CN_wcrtomb;
1254776d4e8SJohn Marino l->__mbsnrtowcs = _EUC_CN_mbsnrtowcs;
1264776d4e8SJohn Marino l->__wcsnrtombs = _EUC_CN_wcsnrtombs;
1274776d4e8SJohn Marino l->__mbsinit = _EUC_mbsinit;
1280d5acd74SJohn Marino
1294776d4e8SJohn Marino l->runes = rl;
1304776d4e8SJohn Marino l->__mb_cur_max = 4;
1314776d4e8SJohn Marino l->__mb_sb_limit = 256;
1324776d4e8SJohn Marino return (0);
1330d5acd74SJohn Marino }
1340d5acd74SJohn Marino
1350d5acd74SJohn Marino static size_t
_EUC_CN_mbrtowc(wchar_t * __restrict pwc,const char * __restrict s,size_t n,mbstate_t * __restrict ps)1364776d4e8SJohn Marino _EUC_CN_mbrtowc(wchar_t * __restrict pwc, const char * __restrict s,
1374776d4e8SJohn Marino size_t n, mbstate_t * __restrict ps)
1384776d4e8SJohn Marino {
1394776d4e8SJohn Marino return (_EUC_mbrtowc_impl(pwc, s, n, ps, SS2, 4, 0, 0));
1404776d4e8SJohn Marino }
1414776d4e8SJohn Marino
1424776d4e8SJohn Marino static size_t
_EUC_CN_mbsnrtowcs(wchar_t * __restrict dst,const char ** __restrict src,size_t nms,size_t len,mbstate_t * __restrict ps)1434776d4e8SJohn Marino _EUC_CN_mbsnrtowcs(wchar_t * __restrict dst,
1444776d4e8SJohn Marino const char ** __restrict src,
1454776d4e8SJohn Marino size_t nms, size_t len, mbstate_t * __restrict ps)
1464776d4e8SJohn Marino {
1474776d4e8SJohn Marino return (__mbsnrtowcs_std(dst, src, nms, len, ps, _EUC_CN_mbrtowc));
1484776d4e8SJohn Marino }
1494776d4e8SJohn Marino
1504776d4e8SJohn Marino static size_t
_EUC_CN_wcrtomb(char * __restrict s,wchar_t wc,mbstate_t * __restrict ps)1514776d4e8SJohn Marino _EUC_CN_wcrtomb(char * __restrict s, wchar_t wc,
1520d5acd74SJohn Marino mbstate_t * __restrict ps)
1530d5acd74SJohn Marino {
1544776d4e8SJohn Marino return (_EUC_wcrtomb_impl(s, wc, ps, SS2, 4, 0, 0));
1554776d4e8SJohn Marino }
1564776d4e8SJohn Marino
1574776d4e8SJohn Marino static size_t
_EUC_CN_wcsnrtombs(char * __restrict dst,const wchar_t ** __restrict src,size_t nwc,size_t len,mbstate_t * __restrict ps)1584776d4e8SJohn Marino _EUC_CN_wcsnrtombs(char * __restrict dst, const wchar_t ** __restrict src,
1594776d4e8SJohn Marino size_t nwc, size_t len, mbstate_t * __restrict ps)
1604776d4e8SJohn Marino {
1614776d4e8SJohn Marino return (__wcsnrtombs_std(dst, src, nwc, len, ps, _EUC_CN_wcrtomb));
1624776d4e8SJohn Marino }
1634776d4e8SJohn Marino
1644776d4e8SJohn Marino /*
1654776d4e8SJohn Marino * EUC-KR uses only CS0 and CS1.
1664776d4e8SJohn Marino */
1674776d4e8SJohn Marino int
_EUC_KR_init(struct xlocale_ctype * l,_RuneLocale * rl)1684776d4e8SJohn Marino _EUC_KR_init(struct xlocale_ctype *l, _RuneLocale *rl)
1694776d4e8SJohn Marino {
1704776d4e8SJohn Marino l->__mbrtowc = _EUC_KR_mbrtowc;
1714776d4e8SJohn Marino l->__wcrtomb = _EUC_KR_wcrtomb;
1724776d4e8SJohn Marino l->__mbsnrtowcs = _EUC_KR_mbsnrtowcs;
1734776d4e8SJohn Marino l->__wcsnrtombs = _EUC_KR_wcsnrtombs;
1744776d4e8SJohn Marino l->__mbsinit = _EUC_mbsinit;
1754776d4e8SJohn Marino
1764776d4e8SJohn Marino l->runes = rl;
1774776d4e8SJohn Marino l->__mb_cur_max = 2;
1784776d4e8SJohn Marino l->__mb_sb_limit = 128;
1794776d4e8SJohn Marino return (0);
1804776d4e8SJohn Marino }
1814776d4e8SJohn Marino
1824776d4e8SJohn Marino static size_t
_EUC_KR_mbrtowc(wchar_t * __restrict pwc,const char * __restrict s,size_t n,mbstate_t * __restrict ps)1834776d4e8SJohn Marino _EUC_KR_mbrtowc(wchar_t * __restrict pwc, const char * __restrict s,
1844776d4e8SJohn Marino size_t n, mbstate_t * __restrict ps)
1854776d4e8SJohn Marino {
1864776d4e8SJohn Marino return (_EUC_mbrtowc_impl(pwc, s, n, ps, 0, 0, 0, 0));
1874776d4e8SJohn Marino }
1884776d4e8SJohn Marino
1894776d4e8SJohn Marino static size_t
_EUC_KR_mbsnrtowcs(wchar_t * __restrict dst,const char ** __restrict src,size_t nms,size_t len,mbstate_t * __restrict ps)1904776d4e8SJohn Marino _EUC_KR_mbsnrtowcs(wchar_t * __restrict dst,
1914776d4e8SJohn Marino const char ** __restrict src,
1924776d4e8SJohn Marino size_t nms, size_t len, mbstate_t * __restrict ps)
1934776d4e8SJohn Marino {
1944776d4e8SJohn Marino return (__mbsnrtowcs_std(dst, src, nms, len, ps, _EUC_KR_mbrtowc));
1954776d4e8SJohn Marino }
1964776d4e8SJohn Marino
1974776d4e8SJohn Marino static size_t
_EUC_KR_wcrtomb(char * __restrict s,wchar_t wc,mbstate_t * __restrict ps)1984776d4e8SJohn Marino _EUC_KR_wcrtomb(char * __restrict s, wchar_t wc,
1994776d4e8SJohn Marino mbstate_t * __restrict ps)
2004776d4e8SJohn Marino {
2014776d4e8SJohn Marino return (_EUC_wcrtomb_impl(s, wc, ps, 0, 0, 0, 0));
2024776d4e8SJohn Marino }
2034776d4e8SJohn Marino
2044776d4e8SJohn Marino static size_t
_EUC_KR_wcsnrtombs(char * __restrict dst,const wchar_t ** __restrict src,size_t nwc,size_t len,mbstate_t * __restrict ps)2054776d4e8SJohn Marino _EUC_KR_wcsnrtombs(char * __restrict dst, const wchar_t ** __restrict src,
2064776d4e8SJohn Marino size_t nwc, size_t len, mbstate_t * __restrict ps)
2074776d4e8SJohn Marino {
2084776d4e8SJohn Marino return (__wcsnrtombs_std(dst, src, nwc, len, ps, _EUC_KR_wcrtomb));
2094776d4e8SJohn Marino }
2104776d4e8SJohn Marino
2114776d4e8SJohn Marino /*
2124776d4e8SJohn Marino * EUC-JP uses CS0, CS1, CS2, and CS3.
2134776d4e8SJohn Marino */
2144776d4e8SJohn Marino int
_EUC_JP_init(struct xlocale_ctype * l,_RuneLocale * rl)2154776d4e8SJohn Marino _EUC_JP_init(struct xlocale_ctype *l, _RuneLocale *rl)
2164776d4e8SJohn Marino {
2174776d4e8SJohn Marino l->__mbrtowc = _EUC_JP_mbrtowc;
2184776d4e8SJohn Marino l->__wcrtomb = _EUC_JP_wcrtomb;
2194776d4e8SJohn Marino l->__mbsnrtowcs = _EUC_JP_mbsnrtowcs;
2204776d4e8SJohn Marino l->__wcsnrtombs = _EUC_JP_wcsnrtombs;
2214776d4e8SJohn Marino l->__mbsinit = _EUC_mbsinit;
2224776d4e8SJohn Marino
2234776d4e8SJohn Marino l->runes = rl;
2244776d4e8SJohn Marino l->__mb_cur_max = 3;
2254776d4e8SJohn Marino l->__mb_sb_limit = 196;
2264776d4e8SJohn Marino return (0);
2274776d4e8SJohn Marino }
2284776d4e8SJohn Marino
2294776d4e8SJohn Marino static size_t
_EUC_JP_mbrtowc(wchar_t * __restrict pwc,const char * __restrict s,size_t n,mbstate_t * __restrict ps)2304776d4e8SJohn Marino _EUC_JP_mbrtowc(wchar_t * __restrict pwc, const char * __restrict s,
2314776d4e8SJohn Marino size_t n, mbstate_t * __restrict ps)
2324776d4e8SJohn Marino {
2334776d4e8SJohn Marino return (_EUC_mbrtowc_impl(pwc, s, n, ps, SS2, 2, SS3, 3));
2344776d4e8SJohn Marino }
2354776d4e8SJohn Marino
2364776d4e8SJohn Marino static size_t
_EUC_JP_mbsnrtowcs(wchar_t * __restrict dst,const char ** __restrict src,size_t nms,size_t len,mbstate_t * __restrict ps)2374776d4e8SJohn Marino _EUC_JP_mbsnrtowcs(wchar_t * __restrict dst,
2384776d4e8SJohn Marino const char ** __restrict src,
2394776d4e8SJohn Marino size_t nms, size_t len, mbstate_t * __restrict ps)
2404776d4e8SJohn Marino {
2414776d4e8SJohn Marino return (__mbsnrtowcs_std(dst, src, nms, len, ps, _EUC_JP_mbrtowc));
2424776d4e8SJohn Marino }
2434776d4e8SJohn Marino
2444776d4e8SJohn Marino static size_t
_EUC_JP_wcrtomb(char * __restrict s,wchar_t wc,mbstate_t * __restrict ps)2454776d4e8SJohn Marino _EUC_JP_wcrtomb(char * __restrict s, wchar_t wc,
2464776d4e8SJohn Marino mbstate_t * __restrict ps)
2474776d4e8SJohn Marino {
2484776d4e8SJohn Marino return (_EUC_wcrtomb_impl(s, wc, ps, SS2, 2, SS3, 3));
2494776d4e8SJohn Marino }
2504776d4e8SJohn Marino
2514776d4e8SJohn Marino static size_t
_EUC_JP_wcsnrtombs(char * __restrict dst,const wchar_t ** __restrict src,size_t nwc,size_t len,mbstate_t * __restrict ps)2524776d4e8SJohn Marino _EUC_JP_wcsnrtombs(char * __restrict dst, const wchar_t ** __restrict src,
2534776d4e8SJohn Marino size_t nwc, size_t len, mbstate_t * __restrict ps)
2544776d4e8SJohn Marino {
2554776d4e8SJohn Marino return (__wcsnrtombs_std(dst, src, nwc, len, ps, _EUC_JP_wcrtomb));
2564776d4e8SJohn Marino }
2574776d4e8SJohn Marino
2584776d4e8SJohn Marino /*
2594776d4e8SJohn Marino * EUC-TW uses CS0, CS1, and CS2.
2604776d4e8SJohn Marino */
2614776d4e8SJohn Marino int
_EUC_TW_init(struct xlocale_ctype * l,_RuneLocale * rl)2624776d4e8SJohn Marino _EUC_TW_init(struct xlocale_ctype *l, _RuneLocale *rl)
2634776d4e8SJohn Marino {
2644776d4e8SJohn Marino l->__mbrtowc = _EUC_TW_mbrtowc;
2654776d4e8SJohn Marino l->__wcrtomb = _EUC_TW_wcrtomb;
2664776d4e8SJohn Marino l->__mbsnrtowcs = _EUC_TW_mbsnrtowcs;
2674776d4e8SJohn Marino l->__wcsnrtombs = _EUC_TW_wcsnrtombs;
2684776d4e8SJohn Marino l->__mbsinit = _EUC_mbsinit;
2694776d4e8SJohn Marino
2704776d4e8SJohn Marino l->runes = rl;
2714776d4e8SJohn Marino l->__mb_cur_max = 4;
2724776d4e8SJohn Marino l->__mb_sb_limit = 256;
2734776d4e8SJohn Marino return (0);
2744776d4e8SJohn Marino }
2754776d4e8SJohn Marino
2764776d4e8SJohn Marino static size_t
_EUC_TW_mbrtowc(wchar_t * __restrict pwc,const char * __restrict s,size_t n,mbstate_t * __restrict ps)2774776d4e8SJohn Marino _EUC_TW_mbrtowc(wchar_t * __restrict pwc, const char * __restrict s,
2784776d4e8SJohn Marino size_t n, mbstate_t * __restrict ps)
2794776d4e8SJohn Marino {
2804776d4e8SJohn Marino return (_EUC_mbrtowc_impl(pwc, s, n, ps, SS2, 4, 0, 0));
2814776d4e8SJohn Marino }
2824776d4e8SJohn Marino
2834776d4e8SJohn Marino static size_t
_EUC_TW_mbsnrtowcs(wchar_t * __restrict dst,const char ** __restrict src,size_t nms,size_t len,mbstate_t * __restrict ps)2844776d4e8SJohn Marino _EUC_TW_mbsnrtowcs(wchar_t * __restrict dst,
2854776d4e8SJohn Marino const char ** __restrict src,
2864776d4e8SJohn Marino size_t nms, size_t len, mbstate_t * __restrict ps)
2874776d4e8SJohn Marino {
2884776d4e8SJohn Marino return (__mbsnrtowcs_std(dst, src, nms, len, ps, _EUC_TW_mbrtowc));
2894776d4e8SJohn Marino }
2904776d4e8SJohn Marino
2914776d4e8SJohn Marino static size_t
_EUC_TW_wcrtomb(char * __restrict s,wchar_t wc,mbstate_t * __restrict ps)2924776d4e8SJohn Marino _EUC_TW_wcrtomb(char * __restrict s, wchar_t wc,
2934776d4e8SJohn Marino mbstate_t * __restrict ps)
2944776d4e8SJohn Marino {
2954776d4e8SJohn Marino return (_EUC_wcrtomb_impl(s, wc, ps, SS2, 4, 0, 0));
2964776d4e8SJohn Marino }
2974776d4e8SJohn Marino
2984776d4e8SJohn Marino static size_t
_EUC_TW_wcsnrtombs(char * __restrict dst,const wchar_t ** __restrict src,size_t nwc,size_t len,mbstate_t * __restrict ps)2994776d4e8SJohn Marino _EUC_TW_wcsnrtombs(char * __restrict dst, const wchar_t ** __restrict src,
3004776d4e8SJohn Marino size_t nwc, size_t len, mbstate_t * __restrict ps)
3014776d4e8SJohn Marino {
3024776d4e8SJohn Marino return (__wcsnrtombs_std(dst, src, nwc, len, ps, _EUC_TW_wcrtomb));
3034776d4e8SJohn Marino }
3044776d4e8SJohn Marino
3054776d4e8SJohn Marino /*
3064776d4e8SJohn Marino * Common EUC code.
3074776d4e8SJohn Marino */
3084776d4e8SJohn Marino
3094776d4e8SJohn Marino static size_t
_EUC_mbrtowc_impl(wchar_t * __restrict pwc,const char * __restrict s,size_t n,mbstate_t * __restrict ps,uint8_t cs2,uint8_t cs2width,uint8_t cs3,uint8_t cs3width)3104776d4e8SJohn Marino _EUC_mbrtowc_impl(wchar_t * __restrict pwc, const char * __restrict s,
3114776d4e8SJohn Marino size_t n, mbstate_t * __restrict ps,
3124776d4e8SJohn Marino uint8_t cs2, uint8_t cs2width, uint8_t cs3, uint8_t cs3width)
3134776d4e8SJohn Marino {
3140d5acd74SJohn Marino _EucState *es;
3154776d4e8SJohn Marino int i, want;
3161b252839SJohn Marino wchar_t wc = 0;
3171b252839SJohn Marino unsigned char ch, chs;
3180d5acd74SJohn Marino
3190d5acd74SJohn Marino es = (_EucState *)ps;
3200d5acd74SJohn Marino
3214776d4e8SJohn Marino if (es->want < 0 || es->want > MB_CUR_MAX) {
3220d5acd74SJohn Marino errno = EINVAL;
3230d5acd74SJohn Marino return ((size_t)-1);
3240d5acd74SJohn Marino }
3250d5acd74SJohn Marino
3260d5acd74SJohn Marino if (s == NULL) {
3270d5acd74SJohn Marino s = "";
3280d5acd74SJohn Marino n = 1;
3290d5acd74SJohn Marino pwc = NULL;
3300d5acd74SJohn Marino }
3310d5acd74SJohn Marino
3320d5acd74SJohn Marino if (n == 0)
3330d5acd74SJohn Marino /* Incomplete multibyte sequence */
3340d5acd74SJohn Marino return ((size_t)-2);
3350d5acd74SJohn Marino
3360d5acd74SJohn Marino if (es->want == 0) {
3374776d4e8SJohn Marino /* Fast path for plain ASCII (CS0) */
3384776d4e8SJohn Marino if (((ch = (unsigned char)*s) & 0x80) == 0) {
3394776d4e8SJohn Marino if (pwc != NULL)
3404776d4e8SJohn Marino *pwc = ch;
3414776d4e8SJohn Marino return (ch != '\0' ? 1 : 0);
3420d5acd74SJohn Marino }
3434776d4e8SJohn Marino
3444776d4e8SJohn Marino if (ch >= 0xa1) {
3454776d4e8SJohn Marino /* CS1 */
3464776d4e8SJohn Marino want = 2;
3474776d4e8SJohn Marino } else if (ch == cs2) {
3484776d4e8SJohn Marino want = cs2width;
3494776d4e8SJohn Marino } else if (ch == cs3) {
3504776d4e8SJohn Marino want = cs3width;
3514776d4e8SJohn Marino } else {
3520d5acd74SJohn Marino errno = EILSEQ;
3530d5acd74SJohn Marino return ((size_t)-1);
3540d5acd74SJohn Marino }
3554776d4e8SJohn Marino
3564776d4e8SJohn Marino
3574776d4e8SJohn Marino es->want = want;
3584776d4e8SJohn Marino es->ch = 0;
3590d5acd74SJohn Marino } else {
3600d5acd74SJohn Marino want = es->want;
3610d5acd74SJohn Marino wc = es->ch;
3620d5acd74SJohn Marino }
3634776d4e8SJohn Marino
3644776d4e8SJohn Marino for (i = 0; i < MIN(want, n); i++) {
3654776d4e8SJohn Marino wc <<= 8;
3661b252839SJohn Marino chs = *s;
3671b252839SJohn Marino wc |= chs;
3684776d4e8SJohn Marino s++;
3690d5acd74SJohn Marino }
3700d5acd74SJohn Marino if (i < want) {
3710d5acd74SJohn Marino /* Incomplete multibyte sequence */
3720d5acd74SJohn Marino es->want = want - i;
3730d5acd74SJohn Marino es->ch = wc;
374*3f6c11afSJohn Marino errno = EILSEQ;
3750d5acd74SJohn Marino return ((size_t)-2);
3760d5acd74SJohn Marino }
3770d5acd74SJohn Marino if (pwc != NULL)
3780d5acd74SJohn Marino *pwc = wc;
3790d5acd74SJohn Marino es->want = 0;
3804776d4e8SJohn Marino return (wc == L'\0' ? 0 : want);
3810d5acd74SJohn Marino }
3820d5acd74SJohn Marino
3830d5acd74SJohn Marino static size_t
_EUC_wcrtomb_impl(char * __restrict s,wchar_t wc,mbstate_t * __restrict ps,uint8_t cs2,uint8_t cs2width,uint8_t cs3,uint8_t cs3width)3844776d4e8SJohn Marino _EUC_wcrtomb_impl(char * __restrict s, wchar_t wc,
3854776d4e8SJohn Marino mbstate_t * __restrict ps,
3864776d4e8SJohn Marino uint8_t cs2, uint8_t cs2width, uint8_t cs3, uint8_t cs3width)
3870d5acd74SJohn Marino {
3880d5acd74SJohn Marino _EucState *es;
3890d5acd74SJohn Marino int i, len;
3904776d4e8SJohn Marino wchar_t nm;
3910d5acd74SJohn Marino
3920d5acd74SJohn Marino es = (_EucState *)ps;
3930d5acd74SJohn Marino
3940d5acd74SJohn Marino if (es->want != 0) {
3950d5acd74SJohn Marino errno = EINVAL;
3960d5acd74SJohn Marino return ((size_t)-1);
3970d5acd74SJohn Marino }
3980d5acd74SJohn Marino
3990d5acd74SJohn Marino if (s == NULL)
4000d5acd74SJohn Marino /* Reset to initial shift state (no-op) */
4010d5acd74SJohn Marino return (1);
4020d5acd74SJohn Marino
4034776d4e8SJohn Marino if ((wc & ~0x7f) == 0) {
4044776d4e8SJohn Marino /* Fast path for plain ASCII (CS0) */
4054776d4e8SJohn Marino *s = (char)wc;
4064776d4e8SJohn Marino return (1);
4074776d4e8SJohn Marino }
4080d5acd74SJohn Marino
4094776d4e8SJohn Marino /* Determine the "length" */
4104776d4e8SJohn Marino if ((unsigned)wc > 0xffffff) {
4114776d4e8SJohn Marino len = 4;
4124776d4e8SJohn Marino } else if ((unsigned)wc > 0xffff) {
4134776d4e8SJohn Marino len = 3;
4144776d4e8SJohn Marino } else if ((unsigned)wc > 0xff) {
4154776d4e8SJohn Marino len = 2;
4160d5acd74SJohn Marino } else {
4174776d4e8SJohn Marino len = 1;
4184776d4e8SJohn Marino }
4194776d4e8SJohn Marino
4204776d4e8SJohn Marino if (len > MB_CUR_MAX) {
4214776d4e8SJohn Marino errno = EILSEQ;
4224776d4e8SJohn Marino return ((size_t)-1);
4234776d4e8SJohn Marino }
4244776d4e8SJohn Marino
4254776d4e8SJohn Marino /* This first check excludes CS1, which is implicitly valid. */
4264776d4e8SJohn Marino if ((wc < 0xa100) || (wc > 0xffff)) {
4274776d4e8SJohn Marino /* Check for valid CS2 or CS3 */
4284776d4e8SJohn Marino nm = (wc >> ((len - 1) * 8));
4294776d4e8SJohn Marino if (nm == cs2) {
4304776d4e8SJohn Marino if (len != cs2width) {
4314776d4e8SJohn Marino errno = EILSEQ;
4324776d4e8SJohn Marino return ((size_t)-1);
4334776d4e8SJohn Marino }
4344776d4e8SJohn Marino } else if (nm == cs3) {
4354776d4e8SJohn Marino if (len != cs3width) {
4364776d4e8SJohn Marino errno = EILSEQ;
4374776d4e8SJohn Marino return ((size_t)-1);
4384776d4e8SJohn Marino }
4394776d4e8SJohn Marino } else {
4404776d4e8SJohn Marino errno = EILSEQ;
4414776d4e8SJohn Marino return ((size_t)-1);
4424776d4e8SJohn Marino }
4434776d4e8SJohn Marino }
4444776d4e8SJohn Marino
4454776d4e8SJohn Marino /* Stash the bytes, least significant last */
4464776d4e8SJohn Marino for (i = len - 1; i >= 0; i--) {
4474776d4e8SJohn Marino s[i] = (wc & 0xff);
4484776d4e8SJohn Marino wc >>= 8;
4490d5acd74SJohn Marino }
4500d5acd74SJohn Marino return (len);
4510d5acd74SJohn Marino }
452