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 33 #include <sys/cdefs.h> 34 __FBSDID("$FreeBSD$"); 35 36 #include <stdlib.h> 37 #include <string.h> 38 #include "collate.h" 39 40 size_t 41 strxfrm_l(char * __restrict dest, const char * __restrict src, size_t len, locale_t loc); 42 size_t 43 strxfrm(char * __restrict dest, const char * __restrict src, size_t len) 44 { 45 return strxfrm_l(dest, src, len, __get_locale()); 46 } 47 48 size_t 49 strxfrm_l(char * __restrict dest, const char * __restrict src, size_t len, locale_t locale) 50 { 51 int prim, sec, l; 52 size_t slen; 53 char *s, *ss; 54 FIX_LOCALE(locale); 55 struct xlocale_collate *table = 56 (struct xlocale_collate*)locale->components[XLC_COLLATE]; 57 58 if (!*src) { 59 if (len > 0) 60 *dest = '\0'; 61 return 0; 62 } 63 64 if (table->__collate_load_error) 65 return strlcpy(dest, src, len); 66 67 slen = 0; 68 prim = sec = 0; 69 ss = s = __collate_substitute(table, src); 70 while (*s) { 71 while (*s && !prim) { 72 __collate_lookup(table, s, &l, &prim, &sec); 73 s += l; 74 } 75 if (prim) { 76 if (len > 1) { 77 *dest++ = (char)prim; 78 len--; 79 } 80 slen++; 81 prim = 0; 82 } 83 } 84 free(ss); 85 if (len > 0) 86 *dest = '\0'; 87 88 return slen; 89 } 90