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  __FBSDID("$FreeBSD: src/lib/libc/string/strcoll.c,v 1.14 2009/02/03 17:58:20 danger Exp $");
30  
31  #include "xlocale_private.h"
32  
33  #include <stdlib.h>
34  #include <string.h>
35  #include <wchar.h>
36  #include <errno.h>
37  #include "collate.h"
38  
39  int
40  strcoll_l(const char *s, const char *s2, locale_t loc)
41  {
42  	int ret;
43  	const wchar_t *t = NULL, *t2 = NULL;
44  	int sverrno;
45  
46  	NORMALIZE_LOCALE(loc);
47  	if (loc->__collate_load_error || (t = __collate_mbstowcs(s, loc)) == NULL || (t2 = __collate_mbstowcs(s2, loc)) == NULL) {
48  		sverrno = errno;
49  		free((void *)t);
50  		free((void *)t2);
51  		errno = sverrno;
52  		return strcmp(s, s2);
53  	}
54  
55  	ret = wcscoll_l(t, t2, loc);
56  	sverrno = errno;
57  	free((void *)t);
58  	free((void *)t2);
59  	errno = sverrno;
60  
61  	return ret;
62  }
63  
64  int
65  strcoll(const char *s, const char *s2)
66  {
67  	return strcoll_l(s, s2, __current_locale());
68  }