Update source headers for 2008. Omit CVS ID keyword subst.
[yaz-moved-to-github.git] / src / cclstr.c
1 /* This file is part of the YAZ toolkit.
2  * Copyright (C) 1995-2008 Index Data
3  * See the file LICENSE for details.
4  */
5 /** 
6  * \file cclstr.c
7  * \brief Implements CCL string compare utilities
8  */
9 #include <ctype.h>
10 #include <stdio.h>
11 #include <stdlib.h>
12
13 #include <yaz/ccl.h>
14
15 static int ccli_toupper (int c)
16 {
17     return toupper (c);
18 }
19
20 int (*ccl_toupper)(int c) = NULL;
21
22 int ccl_stricmp (const char *s1, const char *s2)
23 {
24     if (!ccl_toupper)
25         ccl_toupper = ccli_toupper;
26     while (*s1 && *s2)
27     {
28         int c1, c2;
29         c1 = (*ccl_toupper)(*s1);
30         c2 = (*ccl_toupper)(*s2);
31         if (c1 != c2)
32             return c1 - c2;
33         s1++;
34         s2++;
35     }
36     return (*ccl_toupper)(*s1) - (*ccl_toupper)(*s2);
37 }
38
39 int ccl_memicmp (const char *s1, const char *s2, size_t n)
40 {
41     if (!ccl_toupper)
42         ccl_toupper = ccli_toupper;
43     while (1)
44     {
45         int c1, c2;
46
47         c1 = (*ccl_toupper)(*s1);
48         c2 = (*ccl_toupper)(*s2);
49         if (n <= 1 || c1 != c2)
50             return c1 - c2;
51         s1++;
52         s2++;
53         --n;
54     }
55 }
56
57 /*
58  * Local variables:
59  * c-basic-offset: 4
60  * indent-tabs-mode: nil
61  * End:
62  * vim: shiftwidth=4 tabstop=8 expandtab
63  */
64