1 /*- 2 * Copyright (c) 1995 Alex Tatmanjants <alex@elvisti.kiev.ua> 3 * at Electronni Visti IA, Kiev, Ukraine. 4 * All rights reserved. 5 * 6 * Copyright (c) 2011 The FreeBSD Foundation 7 * All rights reserved. 8 * Portions of this software were developed by David Chisnall 9 * under sponsorship from the FreeBSD Foundation. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE 24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 * 32 * $FreeBSD: head/lib/libc/string/strxfrm.c 227753 2011-11-20 14:45:42Z theraven $ 33 */ 34 35 #include <stdlib.h> 36 #include <string.h> 37 #include "collate.h" 38 39 size_t 40 strxfrm_l(char * __restrict dest, const char * __restrict src, size_t len, locale_t loc); 41 size_t 42 strxfrm(char * __restrict dest, const char * __restrict src, size_t len) 43 { 44 return strxfrm_l(dest, src, len, __get_locale()); 45 } 46 47 size_t 48 strxfrm_l(char * __restrict dest, const char * __restrict src, size_t len, locale_t locale) 49 { 50 int prim, sec, l; 51 size_t slen; 52 char *s, *ss; 53 FIX_LOCALE(locale); 54 struct xlocale_collate *table = 55 (struct xlocale_collate*)locale->components[XLC_COLLATE]; 56 57 if (!*src) { 58 if (len > 0) 59 *dest = '\0'; 60 return 0; 61 } 62 63 if (table->__collate_load_error) 64 return strlcpy(dest, src, len); 65 66 slen = 0; 67 prim = sec = 0; 68 ss = s = __collate_substitute(table, src); 69 while (*s) { 70 while (*s && !prim) { 71 __collate_lookup(table, s, &l, &prim, &sec); 72 s += l; 73 } 74 if (prim) { 75 if (len > 1) { 76 *dest++ = (char)prim; 77 len--; 78 } 79 slen++; 80 prim = 0; 81 } 82 } 83 free(ss); 84 if (len > 0) 85 *dest = '\0'; 86 87 return slen; 88 } 89