xref: /illumos-gate/usr/src/lib/libc/port/locale/wcsxfrm.c (revision 0245b61fd282e95735b173b8d95be0d6688163b4)
1 /*
2  * Copyright 2013 Garrett D'Amore <garrett@damore.org>
3  * Copyright 2011 Nexenta Systems, Inc.  All rights reserved.
4  * Copyright (c) 1995 Alex Tatmanjants <alex@elvisti.kiev.ua>
5  *		at Electronni Visti IA, Kiev, Ukraine.
6  *			All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29 
30 #include "lint.h"
31 #include <stdlib.h>
32 #include <string.h>
33 #include <wchar.h>
34 #include <assert.h>
35 #include "collate.h"
36 
37 #define	WCS_XFRM_OFFSET	1
38 
39 size_t
40 wcsxfrm_l(wchar_t *_RESTRICT_KYWD dest,
41     const wchar_t *_RESTRICT_KYWD src, size_t len, locale_t loc)
42 {
43 	size_t slen;
44 	const struct lc_collate *lcc = loc->collate;
45 
46 	if (*src == L'\0') {
47 		if (len != 0)
48 			*dest = L'\0';
49 		return (0);
50 	}
51 
52 	if ((lcc->lc_is_posix) ||
53 	    ((slen = _collate_wxfrm(lcc, src, dest, len)) == (size_t)-1)) {
54 		goto error;
55 	}
56 
57 	/* Add null termination at the correct location. */
58 	if (len > slen) {
59 		dest[slen] = 0;
60 	} else if (len != 0) {
61 		dest[len-1] = 0;
62 	}
63 
64 	return (slen);
65 
66 error:
67 	slen = wcslen(src);
68 	if (slen < len)
69 		(void) wcscpy(dest, src);
70 	else if (len != 0) {
71 		(void) wcsncpy(dest, src, len - 1);
72 		dest[len - 1] = L'\0';
73 	}
74 	return (slen);
75 }
76 
77 size_t
78 wcsxfrm(wchar_t *_RESTRICT_KYWD dest,
79     const wchar_t *_RESTRICT_KYWD src, size_t len)
80 {
81 	return (wcsxfrm_l(dest, src, len, uselocale(NULL)));
82 }
83