/[MITgcm]/MITgcm_contrib/mpack_src/mpack-1.6-4/strcasecmp.c
ViewVC logotype

Contents of /MITgcm_contrib/mpack_src/mpack-1.6-4/strcasecmp.c

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (show annotations) (download)
Sat Feb 23 20:22:59 2008 UTC (17 years, 4 months ago) by jmc
Branch: MAIN
CVS Tags: HEAD
File MIME type: text/plain
Error occurred while calculating annotation data.
- get new version from: http://packages.qa.debian.org/m/mpack.html
  (files: mpack_1.6.orig.tar.gz, mpack_1.6-4.diff.gz, mpack_1.6-4.dsc)
  and apply patch 'mpack_1.6-4.diff' to original dir: mpack_1.6/
- this fix the MD5 coding on 64.bit platforms (well, seems to).
- added in Contrib to allow separate test (since building mpack seems fishy)

1 /*
2 * String manipulation routines
3 */
4 /* (C) Copyright 1993,1994 by Carnegie Mellon University
5 * All Rights Reserved.
6 *
7 * Permission to use, copy, modify, distribute, and sell this software
8 * and its documentation for any purpose is hereby granted without
9 * fee, provided that the above copyright notice appear in all copies
10 * and that both that copyright notice and this permission notice
11 * appear in supporting documentation, and that the name of Carnegie
12 * Mellon University not be used in advertising or publicity
13 * pertaining to distribution of the software without specific,
14 * written prior permission. Carnegie Mellon University makes no
15 * representations about the suitability of this software for any
16 * purpose. It is provided "as is" without express or implied
17 * warranty.
18 *
19 * CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO
20 * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
21 * AND FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE
22 * FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
23 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
24 * AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
25 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
26 * SOFTWARE.
27 */
28
29 #include <ctype.h>
30
31 static unsigned char upcase[256] = {
32 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15,
33 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
34 ' ','!','"','#','$','%','&', 39,'(',')','*','+',',','-','.','/',
35 '0','1','2','3','4','5','6','7','8','9',':',';','<','=','>','?',
36 '@','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O',
37 'P','Q','R','S','T','U','V','W','X','Y','Z','[', 92,']','^','_',
38 '`','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O',
39 'P','Q','R','S','T','U','V','W','X','Y','Z','{','|','}','~',127,
40 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,
41 144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,
42 160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175,
43 176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191,
44 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,
45 208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,
46 224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,
47 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255};
48
49 #define UPC(x) (upcase[(unsigned char)(x)])
50
51 /*
52 * Same as strcmp, but case-insensitive.
53 */
54 int
55 strcasecmp(register char *s1, register char *s2)
56 {
57 register char c1;
58 while ((c1 = *s1) && UPC(c1) == UPC(*s2)) {
59 s1++;
60 s2++;
61 }
62 return UPC(c1) - UPC(*s2);
63 }
64
65 /*
66 * Same as strncmp, but case-insensitive.
67 */
68 int
69 strncasecmp(register char *s1, register char *s2, int n)
70 {
71 register char c1;
72 while (n-- && (c1 = *s1) && UPC(c1) == UPC(*s2)) {
73 s1++;
74 s2++;
75 }
76 if (n == -1) return 0;
77 return UPC(c1) - UPC(*s2);
78 }
79

  ViewVC Help
Powered by ViewVC 1.1.22