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 #include <stdio.h> 41 42 int 43 strcoll_l(const char *s, const char *s2, locale_t locale) 44 { 45 int len, len2, prim, prim2, sec, sec2, ret, ret2; 46 const char *t, *t2; 47 char *tt, *tt2; 48 FIX_LOCALE(locale); 49 struct xlocale_collate *table = 50 (struct xlocale_collate*)locale->components[XLC_COLLATE]; 51 52 if (table->__collate_load_error) 53 return strcmp(s, s2); 54 55 len = len2 = 1; 56 ret = ret2 = 0; 57 if (table->__collate_substitute_nontrivial) { 58 t = tt = __collate_substitute(table, s); 59 t2 = tt2 = __collate_substitute(table, s2); 60 } else { 61 tt = tt2 = NULL; 62 t = s; 63 t2 = s2; 64 } 65 while(*t && *t2) { 66 prim = prim2 = 0; 67 while(*t && !prim) { 68 __collate_lookup(table, t, &len, &prim, &sec); 69 t += len; 70 } 71 while(*t2 && !prim2) { 72 __collate_lookup(table, t2, &len2, &prim2, &sec2); 73 t2 += len2; 74 } 75 if(!prim || !prim2) 76 break; 77 if(prim != prim2) { 78 ret = prim - prim2; 79 goto end; 80 } 81 if(!ret2) 82 ret2 = sec - sec2; 83 } 84 if(!*t && *t2) 85 ret = -(int)((u_char)*t2); 86 else if(*t && !*t2) 87 ret = (u_char)*t; 88 else if(!*t && !*t2) 89 ret = ret2; 90 end: 91 free(tt); 92 free(tt2); 93 94 return ret; 95 } 96 97 int 98 strcoll(const char *s, const char *s2) 99 { 100 return strcoll_l(s, s2, __get_locale()); 101 } 102 103