[apple/libc.git] / string / FreeBSD / wcsxfrm.c

/*-
 * Copyright (c) 1995 Alex Tatmanjants <alex@elvisti.kiev.ua>
 *		at Electronni Visti IA, Kiev, Ukraine.
 *			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 ``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 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>
#if 0
__FBSDID("FreeBSD: src/lib/libc/string/strxfrm.c,v 1.15 2002/09/06 11:24:06 tjr Exp ");
#endif
__FBSDID("$FreeBSD: src/lib/libc/string/wcsxfrm.c,v 1.3 2004/04/07 09:47:56 tjr Exp $");

#include "xlocale_private.h"

#include <stdlib.h>
#include <string.h>
#include <wchar.h>
#include <errno.h>
#include "collate.h"

#define WCS_XFRM_OFFSET	1

size_t
wcsxfrm_l(wchar_t * __restrict dest, const wchar_t * __restrict src, size_t len,
    locale_t loc)
{
	size_t slen;
	wchar_t *xf[2];
	int sverrno;

	if (*src == L'\0') {
		if (len != 0)
			*dest = L'\0';
		return (0);
	}

	NORMALIZE_LOCALE(loc);
	if (loc->__collate_load_error) {
		slen = wcslen(src);
		if (len > 0) {
			if (slen < len)
				wcscpy(dest, src);
			else {
				wcsncpy(dest, src, len - 1);
				dest[len - 1] = L'\0';
			}
		}
		return (slen);
	}

	__collate_xfrm(src, xf, loc);

	slen = wcslen(xf[0]);
	if (xf[1])
		slen += wcslen(xf[1]) + 1;
	if (len > 0) {
		wchar_t *w = xf[0];
		while (len > 1) {
			if (!*w)
				break;
			*dest++ = *w++ + WCS_XFRM_OFFSET;
			len--;
		}
		if ((w = xf[1]) != NULL) {
			if (len > 1)
				*dest++ = WCS_XFRM_OFFSET;
			while (len > 1) {
				if (!*w)
					break;
				*dest++ = *w++ + WCS_XFRM_OFFSET;
				len--;
			}
		}
		*dest = 0;
 	}
	sverrno = errno;
	free(xf[0]);
	free(xf[1]);
	errno = sverrno;
 
	return (slen);
}

size_t
wcsxfrm(wchar_t * __restrict dest, const wchar_t * __restrict src, size_t len)
{
	return wcsxfrm_l(dest, src, len, __current_locale());
}
Commit	Line	Data
9385eb3d A	1	/*-
	2	* Copyright (c) 1995 Alex Tatmanjants <alex@elvisti.kiev.ua>
	3	* at Electronni Visti IA, Kiev, Ukraine.
	4	* All rights reserved.
	5	*
	6	* Redistribution and use in source and binary forms, with or without
	7	* modification, are permitted provided that the following conditions
	8	* are met:
	9	* 1. Redistributions of source code must retain the above copyright
	10	* notice, this list of conditions and the following disclaimer.
	11	* 2. Redistributions in binary form must reproduce the above copyright
	12	* notice, this list of conditions and the following disclaimer in the
	13	* documentation and/or other materials provided with the distribution.
	14	*
	15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND
	16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE
	19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	25	* SUCH DAMAGE.
	26	*/
	27
	28	#include <sys/cdefs.h>
	29	#if 0
	30	__FBSDID("FreeBSD: src/lib/libc/string/strxfrm.c,v 1.15 2002/09/06 11:24:06 tjr Exp ");
	31	#endif
3d9156a7	32	__FBSDID("$FreeBSD: src/lib/libc/string/wcsxfrm.c,v 1.3 2004/04/07 09:47:56 tjr Exp $");
9385eb3d	33
ad3c9f2a A	34	#include "xlocale_private.h"
ad3c9f2a A	35
9385eb3d A	36	#include <stdlib.h>
	37	#include <string.h>
	38	#include <wchar.h>
ad3c9f2a	39	#include <errno.h>
9385eb3d A	40	#include "collate.h"
9385eb3d A	41
ad3c9f2a	42	#define WCS_XFRM_OFFSET 1
9385eb3d	43
9385eb3d	44	size_t
ad3c9f2a A	45	wcsxfrm_l(wchar_t * __restrict dest, const wchar_t * __restrict src, size_t len,
ad3c9f2a A	46	locale_t loc)
9385eb3d	47	{
9385eb3d	48	size_t slen;
ad3c9f2a A	49	wchar_t *xf[2];
ad3c9f2a A	50	int sverrno;
9385eb3d A	51
	52	if (*src == L'\0') {
	53	if (len != 0)
	54	*dest = L'\0';
	55	return (0);
	56	}
	57
ad3c9f2a A	58	NORMALIZE_LOCALE(loc);
ad3c9f2a A	59	if (loc->__collate_load_error) {
9385eb3d A	60	slen = wcslen(src);
	61	if (len > 0) {
	62	if (slen < len)
	63	wcscpy(dest, src);
	64	else {
	65	wcsncpy(dest, src, len - 1);
	66	dest[len - 1] = L'\0';
	67	}
	68	}
	69	return (slen);
	70	}
	71
ad3c9f2a A	72	__collate_xfrm(src, xf, loc);
	73
	74	slen = wcslen(xf[0]);
	75	if (xf[1])
	76	slen += wcslen(xf[1]) + 1;
	77	if (len > 0) {
	78	wchar_t *w = xf[0];
	79	while (len > 1) {
	80	if (!*w)
	81	break;
	82	dest++ = w++ + WCS_XFRM_OFFSET;
	83	len--;
9385eb3d	84	}
ad3c9f2a A	85	if ((w = xf[1]) != NULL) {
	86	if (len > 1)
	87	*dest++ = WCS_XFRM_OFFSET;
	88	while (len > 1) {
	89	if (!*w)
	90	break;
	91	dest++ = w++ + WCS_XFRM_OFFSET;
9385eb3d A	92	len--;
9385eb3d A	93	}
9385eb3d	94	}
ad3c9f2a A	95	*dest = 0;
	96	}
	97	sverrno = errno;
	98	free(xf[0]);
	99	free(xf[1]);
	100	errno = sverrno;
	101
9385eb3d A	102	return (slen);
	103	}
	104
ad3c9f2a A	105	size_t
ad3c9f2a A	106	wcsxfrm(wchar_t * __restrict dest, const wchar_t * __restrict src, size_t len)
9385eb3d	107	{
ad3c9f2a	108	return wcsxfrm_l(dest, src, len, __current_locale());
9385eb3d	109	}