OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [newlib/] [libc/] [posix/] [collcmp.c] - Blame information for rev 438

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 148 jeremybenn
/*
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
9
 *    notice, this list of conditions and the following disclaimer.
10
 * 2. Redistributions in binary form must reproduce the above copyright
11
 *    notice, this list of conditions and the following disclaimer in the
12
 *    documentation and/or other materials provided with the distribution.
13
 *
14
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND
15
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
18
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
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 <sys/cdefs.h>
28
 
29
#define ASCII_COMPATIBLE_COLLATE        /* see share/colldef */
30
 
31
#include <string.h>
32
#include "collate.h"
33
#ifndef ASCII_COMPATIBLE_COLLATE
34
#include <ctype.h>
35
#endif
36
 
37
/*
38
 * Compare two characters converting collate information
39
 * into ASCII-compatible range, it allows to handle
40
 * "[a-z]"-type ranges with national characters.
41
 */
42
 
43
int __collate_range_cmp (c1, c2)
44
        int c1, c2;
45
{
46
        static char s1[2], s2[2];
47
        int ret;
48
#ifndef ASCII_COMPATIBLE_COLLATE
49
        int as1, as2, al1, al2;
50
#endif
51
 
52
        c1 &= UCHAR_MAX;
53
        c2 &= UCHAR_MAX;
54
        if (c1 == c2)
55
                return (0);
56
 
57
#ifndef ASCII_COMPATIBLE_COLLATE
58
        as1 = isascii(c1);
59
        as2 = isascii(c2);
60
        al1 = isalpha(c1);
61
        al2 = isalpha(c2);
62
 
63
        if (as1 || as2 || al1 || al2) {
64
                if ((as1 && as2) || (!al1 && !al2))
65
                        return (c1 - c2);
66
                if (al1 && !al2) {
67
                        if (isupper(c1))
68
                                return ('A' - c2);
69
                        else
70
                                return ('a' - c2);
71
                } else if (al2 && !al1) {
72
                        if (isupper(c2))
73
                                return (c1 - 'A');
74
                        else
75
                                return (c1 - 'a');
76
                }
77
        }
78
#endif
79
        s1[0] = c1;
80
        s2[0] = c2;
81
        if ((ret = strcoll(s1, s2)) != 0)
82
                return (ret);
83
        return (c1 - c2);
84
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.