git.saurik.com Git - apple/libc.git/blame_incremental

... / ...

Commit	Line	Data
	1	/*-
	2	* Copyright 2013 Garrett D'Amore <garrett@damore.org>
	3	* Copyright 2010 Nexenta Systems, Inc. All rights reserved.
	4	* Copyright (c) 2002-2004 Tim J. Robbins. All rights reserved.
	5	* Copyright (c) 1993
	6	* The Regents of the University of California. All rights reserved.
	7	*
	8	* This code is derived from software contributed to Berkeley by
	9	* Paul Borman at Krystal Technologies.
	10	*
	11	* Copyright (c) 2011 The FreeBSD Foundation
	12	* All rights reserved.
	13	* Portions of this software were developed by David Chisnall
	14	* under sponsorship from the FreeBSD Foundation.
	15	*
	16	* Redistribution and use in source and binary forms, with or without
	17	* modification, are permitted provided that the following conditions
	18	* are met:
	19	* 1. Redistributions of source code must retain the above copyright
	20	* notice, this list of conditions and the following disclaimer.
	21	* 2. Redistributions in binary form must reproduce the above copyright
	22	* notice, this list of conditions and the following disclaimer in the
	23	* documentation and/or other materials provided with the distribution.
	24	* 4. Neither the name of the University nor the names of its contributors
	25	* may be used to endorse or promote products derived from this software
	26	* without specific prior written permission.
	27	*
	28	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
	29	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	30	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	31	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
	32	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	33	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	34	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	35	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	36	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	37	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	38	* SUCH DAMAGE.
	39	*/
	40
	41	#if defined(LIBC_SCCS) && !defined(lint)
	42	static char sccsid[] = "@(#)none.c 8.1 (Berkeley) 6/4/93";
	43	#endif /* LIBC_SCCS and not lint */
	44	#include <sys/cdefs.h>
	45	__FBSDID("$FreeBSD$");
	46
	47	#include "xlocale_private.h"
	48
	49	#include <errno.h>
	50	#include <limits.h>
	51	#include <runetype.h>
	52	#include <stddef.h>
	53	#include <stdio.h>
	54	#include <stdlib.h>
	55	#include <string.h>
	56	#include <wchar.h>
	57	#include "mblocal.h"
	58
	59	/* setup defaults */
	60
	61	int __mb_cur_max = 1;
	62	int __mb_sb_limit = 256; /* Expected to be <= _CACHED_RUNES */
	63
	64	int
	65	_none_init(struct __xlocale_st_runelocale *xrl)
	66	{
	67
	68	xrl->__mbrtowc = _none_mbrtowc;
	69	xrl->__mbsinit = _none_mbsinit;
	70	xrl->__mbsnrtowcs = _none_mbsnrtowcs;
	71	xrl->__wcrtomb = _none_wcrtomb;
	72	xrl->__wcsnrtombs = _none_wcsnrtombs;
	73	xrl->__mb_cur_max = 1;
	74	xrl->__mb_sb_limit = 256;
	75	return(0);
	76	}
	77
	78	int
	79	_none_mbsinit(const mbstate_t *ps __unused, locale_t loc __unused)
	80	{
	81
	82	/*
	83	* Encoding is not state dependent - we are always in the
	84	* initial state.
	85	*/
	86	return (1);
	87	}
	88
	89	size_t
	90	_none_mbrtowc(wchar_t * __restrict pwc, const char * __restrict s, size_t n,
	91	mbstate_t * __restrict ps __unused, locale_t loc __unused)
	92	{
	93
	94	if (s == NULL)
	95	/* Reset to initial shift state (no-op) */
	96	return (0);
	97	if (n == 0)
	98	/* Incomplete multibyte sequence */
	99	return ((size_t)-2);
	100	if (pwc != NULL)
	101	pwc = (unsigned char)s;
	102	return (*s == '\0' ? 0 : 1);
	103	}
	104
	105	size_t
	106	_none_wcrtomb(char * __restrict s, wchar_t wc,
	107	mbstate_t * __restrict ps __unused, locale_t loc __unused)
	108	{
	109
	110	if (s == NULL)
	111	/* Reset to initial shift state (no-op) */
	112	return (1);
	113	if (wc < 0 \|\| wc > UCHAR_MAX) {
	114	errno = EILSEQ;
	115	return ((size_t)-1);
	116	}
	117	*s = (unsigned char)wc;
	118	return (1);
	119	}
	120
	121	size_t
	122	_none_mbsnrtowcs(wchar_t * __restrict dst, const char ** __restrict src,
	123	size_t nms, size_t len, mbstate_t * __restrict ps __unused, locale_t loc __unused)
	124	{
	125	const char *s;
	126	size_t nchr;
	127
	128	if (dst == NULL) {
	129	s = memchr(*src, '\0', nms);
	130	return (s != NULL ? s - *src : nms);
	131	}
	132
	133	s = *src;
	134	nchr = 0;
	135	while (len-- > 0 && nms-- > 0) {
	136	if ((dst++ = (unsigned char)s++) == L'\0') {
	137	*src = NULL;
	138	return (nchr);
	139	}
	140	nchr++;
	141	}
	142	*src = s;
	143	return (nchr);
	144	}
	145
	146	size_t
	147	_none_wcsnrtombs(char * __restrict dst, const wchar_t ** __restrict src,
	148	size_t nwc, size_t len, mbstate_t * __restrict ps __unused, locale_t loc __unused)
	149	{
	150	const wchar_t *s;
	151	size_t nchr;
	152
	153	if (dst == NULL) {
	154	for (s = src; nwc > 0 && s != L'\0'; s++, nwc--) {
	155	if (s < 0 \|\| s > UCHAR_MAX) {
	156	errno = EILSEQ;
	157	return ((size_t)-1);
	158	}
	159	}
	160	return (s - *src);
	161	}
	162
	163	s = *src;
	164	nchr = 0;
	165	while (len-- > 0 && nwc-- > 0) {
	166	if (s < 0 \|\| s > UCHAR_MAX) {
	167	*src = s;
	168	errno = EILSEQ;
	169	return ((size_t)-1);
	170	}
	171	if ((dst++ = s++) == '\0') {
	172	*src = NULL;
	173	return (nchr);
	174	}
	175	nchr++;
	176	}
	177	*src = s;
	178	return (nchr);
	179	}