[apple/libc.git] / locale / FreeBSD / mbsrtowcs.c

/*-
 * Copyright (c) 2002 Tim J. Robbins.
 * 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 <sys/cdefs.h>
__FBSDID("$FreeBSD: src/lib/libc/locale/mbsrtowcs.c,v 1.2 2002/09/06 11:23:45 tjr Exp $");

#include <errno.h>
#include <limits.h>
#include <stdlib.h>
#include <wchar.h>

size_t
mbsrtowcs(wchar_t * __restrict dst, const char ** __restrict src, size_t len,
    mbstate_t * __restrict ps __unused)
{
	const char *s;
	size_t nchr;
	wchar_t wc;
	int nb;

	s = *src;
	nchr = 0;

	if (dst == NULL) {
		for (;;) {
			if ((nb = (int)mbrtowc(&wc, s, MB_CUR_MAX, NULL)) < 0)
				/* Invalid sequence - mbrtowc() sets errno. */
				return ((size_t)-1);
			else if (nb == 0)
				return (nchr);
			s += nb;
			nchr++;
		}
		/*NOTREACHED*/
	}

	while (len-- > 0) {
		if ((nb = (int)mbrtowc(dst, s, MB_CUR_MAX, NULL)) < 0) {
			*src = s;
			return ((size_t)-1);
		} else if (nb == 0) {
			*src = NULL;
			return (nchr);
		}
		s += nb;
		nchr++;
		dst++;
	}
	*src = s;
	return (nchr);
}
Commit	Line	Data
5b2abdfb	1	/*-
9385eb3d	2	* Copyright (c) 2002 Tim J. Robbins.
5b2abdfb A	3	* All rights reserved.
	4	*
	5	* Redistribution and use in source and binary forms, with or without
	6	* modification, are permitted provided that the following conditions
	7	* are met:
	8	* 1. Redistributions of source code must retain the above copyright
	9	* notice, this list of conditions and the following disclaimer.
	10	* 2. Redistributions in binary form must reproduce the above copyright
	11	* notice, this list of conditions and the following disclaimer in the
	12	* documentation and/or other materials provided with the distribution.
	13	*
	14	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
	15	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	16	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	17	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
	18	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	19	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	20	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	21	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	22	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	23	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	24	* SUCH DAMAGE.
5b2abdfb	25	*/
9385eb3d A	26
	27	#include <sys/cdefs.h>
	28	__FBSDID("$FreeBSD: src/lib/libc/locale/mbsrtowcs.c,v 1.2 2002/09/06 11:23:45 tjr Exp $");
	29
	30	#include <errno.h>
	31	#include <limits.h>
5b2abdfb	32	#include <stdlib.h>
9385eb3d	33	#include <wchar.h>
5b2abdfb	34
9385eb3d A	35	size_t
	36	mbsrtowcs(wchar_t * __restrict dst, const char ** __restrict src, size_t len,
	37	mbstate_t * __restrict ps __unused)
5b2abdfb	38	{
9385eb3d A	39	const char *s;
	40	size_t nchr;
	41	wchar_t wc;
	42	int nb;
	43
	44	s = *src;
	45	nchr = 0;
	46
	47	if (dst == NULL) {
	48	for (;;) {
	49	if ((nb = (int)mbrtowc(&wc, s, MB_CUR_MAX, NULL)) < 0)
	50	/* Invalid sequence - mbrtowc() sets errno. */
	51	return ((size_t)-1);
	52	else if (nb == 0)
	53	return (nchr);
	54	s += nb;
	55	nchr++;
	56	}
	57	/NOTREACHED/
	58	}
5b2abdfb	59
9385eb3d A	60	while (len-- > 0) {
	61	if ((nb = (int)mbrtowc(dst, s, MB_CUR_MAX, NULL)) < 0) {
	62	*src = s;
	63	return ((size_t)-1);
	64	} else if (nb == 0) {
	65	*src = NULL;
	66	return (nchr);
	67	}
	68	s += nb;
	69	nchr++;
	70	dst++;
	71	}
	72	*src = s;
	73	return (nchr);
5b2abdfb	74	}