1/* 2 * Copyright (C) 1996 by Andrey A. Chernov, Moscow, Russia. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright --- 12 unchanged lines hidden (view full) --- 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 */ 26 27#include <ctype.h> 28#include <string.h> |
29#include <locale.h> 30 31/* will be removed ***************************/ |
32#include "collate.h" 33 34int __collcmp (c1, c2) |
35 unsigned char c1, c2; |
36{ |
37 return collate_range_cmp (c1, c2); 38} 39/* will be removed ***************************/ 40 41int collate_range_cmp (c1, c2) 42 int c1, c2; 43{ |
44 static char s1[2], s2[2]; 45 |
46 c1 &= UCHAR_MAX; 47 c2 &= UCHAR_MAX; |
48 if (c1 == c2) 49 return (0); 50 if ( (isascii(c1) && isascii(c2)) 51 || (!isalpha(c1) && !isalpha(c2)) 52 ) |
53 return (c1 - c2); |
54 if (isalpha(c1) && !isalpha(c2)) { 55 if (isupper(c1)) |
56 return ('A' - c2); |
57 else |
58 return ('a' - c2); |
59 } else if (isalpha(c2) && !isalpha(c1)) { 60 if (isupper(c2)) |
61 return (c1 - 'A'); |
62 else |
63 return (c1 - 'a'); |
64 } 65 if (isupper(c1) && islower(c2)) 66 return (-1); 67 else if (islower(c1) && isupper(c2)) 68 return (1); |
69 s1[0] = c1; 70 s2[0] = c2; |
71 return strcoll(s1, s2); 72} |