0000: 2f 2a 20 0a 20 2a 20 73 74 72 6e 63 61 73 65 63 /* . * strncasec
0010: 6d 70 2e 63 20 2d 2d 0a 20 2a 0a 20 2a 09 53 6f mp.c --. *. *.So
0020: 75 72 63 65 20 63 6f 64 65 20 66 6f 72 20 74 68 urce code for th
0030: 65 20 22 73 74 72 6e 63 61 73 65 63 6d 70 22 20 e "strncasecmp"
0040: 6c 69 62 72 61 72 79 20 72 6f 75 74 69 6e 65 2e library routine.
0050: 0a 20 2a 0a 20 2a 20 43 6f 70 79 72 69 67 68 74 . *. * Copyright
0060: 20 28 63 29 20 31 39 38 38 2d 31 39 39 33 20 54 (c) 1988-1993 T
0070: 68 65 20 52 65 67 65 6e 74 73 20 6f 66 20 74 68 he Regents of th
0080: 65 20 55 6e 69 76 65 72 73 69 74 79 20 6f 66 20 e University of
0090: 43 61 6c 69 66 6f 72 6e 69 61 2e 0a 20 2a 20 43 California.. * C
00a0: 6f 70 79 72 69 67 68 74 20 28 63 29 20 31 39 39 opyright (c) 199
00b0: 35 2d 31 39 39 36 20 53 75 6e 20 4d 69 63 72 6f 5-1996 Sun Micro
00c0: 73 79 73 74 65 6d 73 2c 20 49 6e 63 2e 0a 20 2a systems, Inc.. *
00d0: 0a 20 2a 20 53 65 65 20 74 68 65 20 66 69 6c 65 . * See the file
00e0: 20 22 6c 69 63 65 6e 73 65 2e 74 65 72 6d 73 22 "license.terms"
00f0: 20 66 6f 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e for information
0100: 20 6f 6e 20 75 73 61 67 65 20 61 6e 64 20 72 65 on usage and re
0110: 64 69 73 74 72 69 62 75 74 69 6f 6e 0a 20 2a 20 distribution. *
0120: 6f 66 20 74 68 69 73 20 66 69 6c 65 2c 20 61 6e of this file, an
0130: 64 20 66 6f 72 20 61 20 44 49 53 43 4c 41 49 4d d for a DISCLAIM
0140: 45 52 20 4f 46 20 41 4c 4c 20 57 41 52 52 41 4e ER OF ALL WARRAN
0150: 54 49 45 53 2e 0a 20 2a 0a 20 2a 20 53 43 43 53 TIES.. *. * SCCS
0160: 3a 20 40 28 23 29 20 73 74 72 6e 63 61 73 65 63 : @(#) strncasec
0170: 6d 70 2e 63 20 31 2e 37 20 39 36 2f 31 30 2f 32 mp.c 1.7 96/10/2
0180: 34 20 31 35 3a 32 33 3a 33 36 0a 20 2a 2f 0a 0a 4 15:23:36. */..
0190: 23 69 6e 63 6c 75 64 65 20 22 74 63 6c 50 6f 72 #include "tclPor
01a0: 74 2e 68 22 0a 0a 2f 2a 0a 20 2a 20 54 68 69 73 t.h"../*. * This
01b0: 20 61 72 72 61 79 20 69 73 20 64 65 73 69 67 6e array is design
01c0: 65 64 20 66 6f 72 20 6d 61 70 70 69 6e 67 20 75 ed for mapping u
01d0: 70 70 65 72 20 61 6e 64 20 6c 6f 77 65 72 20 63 pper and lower c
01e0: 61 73 65 20 6c 65 74 74 65 72 0a 20 2a 20 74 6f ase letter. * to
01f0: 67 65 74 68 65 72 20 66 6f 72 20 61 20 63 61 73 gether for a cas
0200: 65 20 69 6e 64 65 70 65 6e 64 65 6e 74 20 63 6f e independent co
0210: 6d 70 61 72 69 73 6f 6e 2e 20 20 54 68 65 20 6d mparison. The m
0220: 61 70 70 69 6e 67 73 20 61 72 65 0a 20 2a 20 62 appings are. * b
0230: 61 73 65 64 20 75 70 6f 6e 20 41 53 43 49 49 20 ased upon ASCII
0240: 63 68 61 72 61 63 74 65 72 20 73 65 71 75 65 6e character sequen
0250: 63 65 73 2e 0a 20 2a 2f 0a 0a 73 74 61 74 69 63 ces.. */..static
0260: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 63 unsigned char c
0270: 68 61 72 6d 61 70 5b 5d 20 3d 20 7b 0a 20 20 20 harmap[] = {.
0280: 20 30 78 30 30 2c 20 30 78 30 31 2c 20 30 78 30 0x00, 0x01, 0x0
0290: 32 2c 20 30 78 30 33 2c 20 30 78 30 34 2c 20 30 2, 0x03, 0x04, 0
02a0: 78 30 35 2c 20 30 78 30 36 2c 20 30 78 30 37 2c x05, 0x06, 0x07,
02b0: 0a 20 20 20 20 30 78 30 38 2c 20 30 78 30 39 2c . 0x08, 0x09,
02c0: 20 30 78 30 61 2c 20 30 78 30 62 2c 20 30 78 30 0x0a, 0x0b, 0x0
02d0: 63 2c 20 30 78 30 64 2c 20 30 78 30 65 2c 20 30 c, 0x0d, 0x0e, 0
02e0: 78 30 66 2c 0a 20 20 20 20 30 78 31 30 2c 20 30 x0f,. 0x10, 0
02f0: 78 31 31 2c 20 30 78 31 32 2c 20 30 78 31 33 2c x11, 0x12, 0x13,
0300: 20 30 78 31 34 2c 20 30 78 31 35 2c 20 30 78 31 0x14, 0x15, 0x1
0310: 36 2c 20 30 78 31 37 2c 0a 20 20 20 20 30 78 31 6, 0x17,. 0x1
0320: 38 2c 20 30 78 31 39 2c 20 30 78 31 61 2c 20 30 8, 0x19, 0x1a, 0
0330: 78 31 62 2c 20 30 78 31 63 2c 20 30 78 31 64 2c x1b, 0x1c, 0x1d,
0340: 20 30 78 31 65 2c 20 30 78 31 66 2c 0a 20 20 20 0x1e, 0x1f,.
0350: 20 30 78 32 30 2c 20 30 78 32 31 2c 20 30 78 32 0x20, 0x21, 0x2
0360: 32 2c 20 30 78 32 33 2c 20 30 78 32 34 2c 20 30 2, 0x23, 0x24, 0
0370: 78 32 35 2c 20 30 78 32 36 2c 20 30 78 32 37 2c x25, 0x26, 0x27,
0380: 0a 20 20 20 20 30 78 32 38 2c 20 30 78 32 39 2c . 0x28, 0x29,
0390: 20 30 78 32 61 2c 20 30 78 32 62 2c 20 30 78 32 0x2a, 0x2b, 0x2
03a0: 63 2c 20 30 78 32 64 2c 20 30 78 32 65 2c 20 30 c, 0x2d, 0x2e, 0
03b0: 78 32 66 2c 0a 20 20 20 20 30 78 33 30 2c 20 30 x2f,. 0x30, 0
03c0: 78 33 31 2c 20 30 78 33 32 2c 20 30 78 33 33 2c x31, 0x32, 0x33,
03d0: 20 30 78 33 34 2c 20 30 78 33 35 2c 20 30 78 33 0x34, 0x35, 0x3
03e0: 36 2c 20 30 78 33 37 2c 0a 20 20 20 20 30 78 33 6, 0x37,. 0x3
03f0: 38 2c 20 30 78 33 39 2c 20 30 78 33 61 2c 20 30 8, 0x39, 0x3a, 0
0400: 78 33 62 2c 20 30 78 33 63 2c 20 30 78 33 64 2c x3b, 0x3c, 0x3d,
0410: 20 30 78 33 65 2c 20 30 78 33 66 2c 0a 20 20 20 0x3e, 0x3f,.
0420: 20 30 78 34 30 2c 20 30 78 36 31 2c 20 30 78 36 0x40, 0x61, 0x6
0430: 32 2c 20 30 78 36 33 2c 20 30 78 36 34 2c 20 30 2, 0x63, 0x64, 0
0440: 78 36 35 2c 20 30 78 36 36 2c 20 30 78 36 37 2c x65, 0x66, 0x67,
0450: 0a 20 20 20 20 30 78 36 38 2c 20 30 78 36 39 2c . 0x68, 0x69,
0460: 20 30 78 36 61 2c 20 30 78 36 62 2c 20 30 78 36 0x6a, 0x6b, 0x6
0470: 63 2c 20 30 78 36 64 2c 20 30 78 36 65 2c 20 30 c, 0x6d, 0x6e, 0
0480: 78 36 66 2c 0a 20 20 20 20 30 78 37 30 2c 20 30 x6f,. 0x70, 0
0490: 78 37 31 2c 20 30 78 37 32 2c 20 30 78 37 33 2c x71, 0x72, 0x73,
04a0: 20 30 78 37 34 2c 20 30 78 37 35 2c 20 30 78 37 0x74, 0x75, 0x7
04b0: 36 2c 20 30 78 37 37 2c 0a 20 20 20 20 30 78 37 6, 0x77,. 0x7
04c0: 38 2c 20 30 78 37 39 2c 20 30 78 37 61 2c 20 30 8, 0x79, 0x7a, 0
04d0: 78 35 62 2c 20 30 78 35 63 2c 20 30 78 35 64 2c x5b, 0x5c, 0x5d,
04e0: 20 30 78 35 65 2c 20 30 78 35 66 2c 0a 20 20 20 0x5e, 0x5f,.
04f0: 20 30 78 36 30 2c 20 30 78 36 31 2c 20 30 78 36 0x60, 0x61, 0x6
0500: 32 2c 20 30 78 36 33 2c 20 30 78 36 34 2c 20 30 2, 0x63, 0x64, 0
0510: 78 36 35 2c 20 30 78 36 36 2c 20 30 78 36 37 2c x65, 0x66, 0x67,
0520: 0a 20 20 20 20 30 78 36 38 2c 20 30 78 36 39 2c . 0x68, 0x69,
0530: 20 30 78 36 61 2c 20 30 78 36 62 2c 20 30 78 36 0x6a, 0x6b, 0x6
0540: 63 2c 20 30 78 36 64 2c 20 30 78 36 65 2c 20 30 c, 0x6d, 0x6e, 0
0550: 78 36 66 2c 0a 20 20 20 20 30 78 37 30 2c 20 30 x6f,. 0x70, 0
0560: 78 37 31 2c 20 30 78 37 32 2c 20 30 78 37 33 2c x71, 0x72, 0x73,
0570: 20 30 78 37 34 2c 20 30 78 37 35 2c 20 30 78 37 0x74, 0x75, 0x7
0580: 36 2c 20 30 78 37 37 2c 0a 20 20 20 20 30 78 37 6, 0x77,. 0x7
0590: 38 2c 20 30 78 37 39 2c 20 30 78 37 61 2c 20 30 8, 0x79, 0x7a, 0
05a0: 78 37 62 2c 20 30 78 37 63 2c 20 30 78 37 64 2c x7b, 0x7c, 0x7d,
05b0: 20 30 78 37 65 2c 20 30 78 37 66 2c 0a 20 20 20 0x7e, 0x7f,.
05c0: 20 30 78 38 30 2c 20 30 78 38 31 2c 20 30 78 38 0x80, 0x81, 0x8
05d0: 32 2c 20 30 78 38 33 2c 20 30 78 38 34 2c 20 30 2, 0x83, 0x84, 0
05e0: 78 38 35 2c 20 30 78 38 36 2c 20 30 78 38 37 2c x85, 0x86, 0x87,
05f0: 0a 20 20 20 20 30 78 38 38 2c 20 30 78 38 39 2c . 0x88, 0x89,
0600: 20 30 78 38 61 2c 20 30 78 38 62 2c 20 30 78 38 0x8a, 0x8b, 0x8
0610: 63 2c 20 30 78 38 64 2c 20 30 78 38 65 2c 20 30 c, 0x8d, 0x8e, 0
0620: 78 38 66 2c 0a 20 20 20 20 30 78 39 30 2c 20 30 x8f,. 0x90, 0
0630: 78 39 31 2c 20 30 78 39 32 2c 20 30 78 39 33 2c x91, 0x92, 0x93,
0640: 20 30 78 39 34 2c 20 30 78 39 35 2c 20 30 78 39 0x94, 0x95, 0x9
0650: 36 2c 20 30 78 39 37 2c 0a 20 20 20 20 30 78 39 6, 0x97,. 0x9
0660: 38 2c 20 30 78 39 39 2c 20 30 78 39 61 2c 20 30 8, 0x99, 0x9a, 0
0670: 78 39 62 2c 20 30 78 39 63 2c 20 30 78 39 64 2c x9b, 0x9c, 0x9d,
0680: 20 30 78 39 65 2c 20 30 78 39 66 2c 0a 20 20 20 0x9e, 0x9f,.
0690: 20 30 78 61 30 2c 20 30 78 61 31 2c 20 30 78 61 0xa0, 0xa1, 0xa
06a0: 32 2c 20 30 78 61 33 2c 20 30 78 61 34 2c 20 30 2, 0xa3, 0xa4, 0
06b0: 78 61 35 2c 20 30 78 61 36 2c 20 30 78 61 37 2c xa5, 0xa6, 0xa7,
06c0: 0a 20 20 20 20 30 78 61 38 2c 20 30 78 61 39 2c . 0xa8, 0xa9,
06d0: 20 30 78 61 61 2c 20 30 78 61 62 2c 20 30 78 61 0xaa, 0xab, 0xa
06e0: 63 2c 20 30 78 61 64 2c 20 30 78 61 65 2c 20 30 c, 0xad, 0xae, 0
06f0: 78 61 66 2c 0a 20 20 20 20 30 78 62 30 2c 20 30 xaf,. 0xb0, 0
0700: 78 62 31 2c 20 30 78 62 32 2c 20 30 78 62 33 2c xb1, 0xb2, 0xb3,
0710: 20 30 78 62 34 2c 20 30 78 62 35 2c 20 30 78 62 0xb4, 0xb5, 0xb
0720: 36 2c 20 30 78 62 37 2c 0a 20 20 20 20 30 78 62 6, 0xb7,. 0xb
0730: 38 2c 20 30 78 62 39 2c 20 30 78 62 61 2c 20 30 8, 0xb9, 0xba, 0
0740: 78 62 62 2c 20 30 78 62 63 2c 20 30 78 62 64 2c xbb, 0xbc, 0xbd,
0750: 20 30 78 62 65 2c 20 30 78 62 66 2c 0a 20 20 20 0xbe, 0xbf,.
0760: 20 30 78 63 30 2c 20 30 78 65 31 2c 20 30 78 65 0xc0, 0xe1, 0xe
0770: 32 2c 20 30 78 65 33 2c 20 30 78 65 34 2c 20 30 2, 0xe3, 0xe4, 0
0780: 78 63 35 2c 20 30 78 65 36 2c 20 30 78 65 37 2c xc5, 0xe6, 0xe7,
0790: 0a 20 20 20 20 30 78 65 38 2c 20 30 78 65 39 2c . 0xe8, 0xe9,
07a0: 20 30 78 65 61 2c 20 30 78 65 62 2c 20 30 78 65 0xea, 0xeb, 0xe
07b0: 63 2c 20 30 78 65 64 2c 20 30 78 65 65 2c 20 30 c, 0xed, 0xee, 0
07c0: 78 65 66 2c 0a 20 20 20 20 30 78 66 30 2c 20 30 xef,. 0xf0, 0
07d0: 78 66 31 2c 20 30 78 66 32 2c 20 30 78 66 33 2c xf1, 0xf2, 0xf3,
07e0: 20 30 78 66 34 2c 20 30 78 66 35 2c 20 30 78 66 0xf4, 0xf5, 0xf
07f0: 36 2c 20 30 78 66 37 2c 0a 20 20 20 20 30 78 66 6, 0xf7,. 0xf
0800: 38 2c 20 30 78 66 39 2c 20 30 78 66 61 2c 20 30 8, 0xf9, 0xfa, 0
0810: 78 64 62 2c 20 30 78 64 63 2c 20 30 78 64 64 2c xdb, 0xdc, 0xdd,
0820: 20 30 78 64 65 2c 20 30 78 64 66 2c 0a 20 20 20 0xde, 0xdf,.
0830: 20 30 78 65 30 2c 20 30 78 65 31 2c 20 30 78 65 0xe0, 0xe1, 0xe
0840: 32 2c 20 30 78 65 33 2c 20 30 78 65 34 2c 20 30 2, 0xe3, 0xe4, 0
0850: 78 65 35 2c 20 30 78 65 36 2c 20 30 78 65 37 2c xe5, 0xe6, 0xe7,
0860: 0a 20 20 20 20 30 78 65 38 2c 20 30 78 65 39 2c . 0xe8, 0xe9,
0870: 20 30 78 65 61 2c 20 30 78 65 62 2c 20 30 78 65 0xea, 0xeb, 0xe
0880: 63 2c 20 30 78 65 64 2c 20 30 78 65 65 2c 20 30 c, 0xed, 0xee, 0
0890: 78 65 66 2c 0a 20 20 20 20 30 78 66 30 2c 20 30 xef,. 0xf0, 0
08a0: 78 66 31 2c 20 30 78 66 32 2c 20 30 78 66 33 2c xf1, 0xf2, 0xf3,
08b0: 20 30 78 66 34 2c 20 30 78 66 35 2c 20 30 78 66 0xf4, 0xf5, 0xf
08c0: 36 2c 20 30 78 66 37 2c 0a 20 20 20 20 30 78 66 6, 0xf7,. 0xf
08d0: 38 2c 20 30 78 66 39 2c 20 30 78 66 61 2c 20 30 8, 0xf9, 0xfa, 0
08e0: 78 66 62 2c 20 30 78 66 63 2c 20 30 78 66 64 2c xfb, 0xfc, 0xfd,
08f0: 20 30 78 66 65 2c 20 30 78 66 66 2c 0a 7d 3b 0a 0xfe, 0xff,.};.
0900: 0a 2f 2a 0a 20 2a 20 48 65 72 65 20 61 72 65 20 ./*. * Here are
0910: 74 68 65 20 70 72 6f 74 6f 74 79 70 65 73 20 6a the prototypes j
0920: 75 73 74 20 69 6e 20 63 61 73 65 20 74 68 65 79 ust in case they
0930: 20 61 72 65 20 6e 6f 74 20 69 6e 63 6c 75 64 65 are not include
0940: 64 0a 20 2a 20 69 6e 20 74 63 6c 50 6f 72 74 2e d. * in tclPort.
0950: 68 2e 0a 20 2a 2f 0a 69 6e 74 09 09 73 74 72 6e h.. */.int..strn
0960: 63 61 73 65 63 6d 70 20 5f 41 4e 53 49 5f 41 52 casecmp _ANSI_AR
0970: 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 20 GS_((CONST char
0980: 2a 73 31 2c 0a 09 09 09 20 20 20 20 43 4f 4e 53 *s1,.... CONS
0990: 54 20 63 68 61 72 20 2a 73 32 2c 20 73 69 7a 65 T char *s2, size
09a0: 5f 74 20 6e 29 29 3b 0a 0a 69 6e 74 09 09 73 74 _t n));..int..st
09b0: 72 63 61 73 65 63 6d 70 20 5f 41 4e 53 49 5f 41 rcasecmp _ANSI_A
09c0: 52 47 53 5f 28 28 43 4f 4e 53 54 20 63 68 61 72 RGS_((CONST char
09d0: 20 2a 73 31 2c 0a 09 09 09 20 20 20 20 43 4f 4e *s1,.... CON
09e0: 53 54 20 63 68 61 72 20 2a 73 32 29 29 3b 0a 0c ST char *s2));..
09f0: 0a 2f 2a 0a 20 2a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ./*. *----------
0a00: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0a10: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0a20: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0a30: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 20 2a 0a ------------. *.
0a40: 20 2a 20 73 74 72 63 61 73 65 63 6d 70 20 2d 2d * strcasecmp --
0a50: 0a 20 2a 0a 20 2a 09 43 6f 6d 70 61 72 65 73 20 . *. *.Compares
0a60: 74 77 6f 20 73 74 72 69 6e 67 73 2c 20 69 67 6e two strings, ign
0a70: 6f 72 69 6e 67 20 63 61 73 65 20 64 69 66 66 65 oring case diffe
0a80: 72 65 6e 63 65 73 2e 0a 20 2a 0a 20 2a 20 52 65 rences.. *. * Re
0a90: 73 75 6c 74 73 3a 0a 20 2a 09 43 6f 6d 70 61 72 sults:. *.Compar
0aa0: 65 73 20 74 77 6f 20 6e 75 6c 6c 2d 74 65 72 6d es two null-term
0ab0: 69 6e 61 74 65 64 20 73 74 72 69 6e 67 73 20 73 inated strings s
0ac0: 31 20 61 6e 64 20 73 32 2c 20 72 65 74 75 72 6e 1 and s2, return
0ad0: 69 6e 67 20 2d 31 2c 20 30 2c 0a 20 2a 09 6f 72 ing -1, 0,. *.or
0ae0: 20 31 20 69 66 20 73 31 20 69 73 20 6c 65 78 69 1 if s1 is lexi
0af0: 63 6f 67 72 61 70 68 69 63 61 6c 6c 79 20 6c 65 cographically le
0b00: 73 73 20 74 68 61 6e 2c 20 65 71 75 61 6c 20 74 ss than, equal t
0b10: 6f 2c 20 6f 72 20 67 72 65 61 74 65 72 0a 20 2a o, or greater. *
0b20: 09 74 68 61 6e 20 73 32 2e 0a 20 2a 0a 20 2a 20 .than s2.. *. *
0b30: 53 69 64 65 20 65 66 66 65 63 74 73 3a 0a 20 2a Side effects:. *
0b40: 09 4e 6f 6e 65 2e 0a 20 2a 0a 20 2a 2d 2d 2d 2d .None.. *. *----
0b50: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0b60: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0b70: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0b80: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0b90: 2d 2d 0a 20 2a 2f 0a 0a 69 6e 74 0a 73 74 72 63 --. */..int.strc
0ba0: 61 73 65 63 6d 70 28 73 31 2c 20 73 32 29 0a 20 asecmp(s1, s2).
0bb0: 20 20 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 73 CONST char *s
0bc0: 31 3b 09 09 09 2f 2a 20 46 69 72 73 74 20 73 74 1;.../* First st
0bd0: 72 69 6e 67 2e 20 2a 2f 0a 20 20 20 20 43 4f 4e ring. */. CON
0be0: 53 54 20 63 68 61 72 20 2a 73 32 3b 09 09 09 2f ST char *s2;.../
0bf0: 2a 20 53 65 63 6f 6e 64 20 73 74 72 69 6e 67 2e * Second string.
0c00: 20 2a 2f 0a 7b 0a 20 20 20 20 75 6e 73 69 67 6e */.{. unsign
0c10: 65 64 20 63 68 61 72 20 75 31 2c 20 75 32 3b 0a ed char u1, u2;.
0c20: 0a 20 20 20 20 66 6f 72 20 28 20 3b 20 3b 20 73 . for ( ; ; s
0c30: 31 2b 2b 2c 20 73 32 2b 2b 29 20 7b 0a 09 75 31 1++, s2++) {..u1
0c40: 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61 = (unsigned cha
0c50: 72 29 20 2a 73 31 3b 0a 09 75 32 20 3d 20 28 75 r) *s1;..u2 = (u
0c60: 6e 73 69 67 6e 65 64 20 63 68 61 72 29 20 2a 73 nsigned char) *s
0c70: 32 3b 0a 09 69 66 20 28 28 75 31 20 3d 3d 20 27 2;..if ((u1 == '
0c80: 5c 30 27 29 20 7c 7c 20 28 63 68 61 72 6d 61 70 \0') || (charmap
0c90: 5b 75 31 5d 20 21 3d 20 63 68 61 72 6d 61 70 5b [u1] != charmap[
0ca0: 75 32 5d 29 29 20 7b 0a 09 20 20 20 20 62 72 65 u2])) {.. bre
0cb0: 61 6b 3b 0a 09 7d 0a 20 20 20 20 7d 0a 20 20 20 ak;..}. }.
0cc0: 20 72 65 74 75 72 6e 20 63 68 61 72 6d 61 70 5b return charmap[
0cd0: 75 31 5d 20 2d 20 63 68 61 72 6d 61 70 5b 75 32 u1] - charmap[u2
0ce0: 5d 3b 0a 7d 0a 0c 0a 2f 2a 0a 20 2a 2d 2d 2d 2d ];.}.../*. *----
0cf0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0d00: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0d10: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0d20: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0d30: 2d 2d 0a 20 2a 0a 20 2a 20 73 74 72 6e 63 61 73 --. *. * strncas
0d40: 65 63 6d 70 20 2d 2d 0a 20 2a 0a 20 2a 09 43 6f ecmp --. *. *.Co
0d50: 6d 70 61 72 65 73 20 74 77 6f 20 73 74 72 69 6e mpares two strin
0d60: 67 73 2c 20 69 67 6e 6f 72 69 6e 67 20 63 61 73 gs, ignoring cas
0d70: 65 20 64 69 66 66 65 72 65 6e 63 65 73 2e 0a 20 e differences..
0d80: 2a 0a 20 2a 20 52 65 73 75 6c 74 73 3a 0a 20 2a *. * Results:. *
0d90: 09 43 6f 6d 70 61 72 65 73 20 75 70 20 74 6f 20 .Compares up to
0da0: 6c 65 6e 67 74 68 20 63 68 61 72 73 20 6f 66 20 length chars of
0db0: 73 31 20 61 6e 64 20 73 32 2c 20 72 65 74 75 72 s1 and s2, retur
0dc0: 6e 69 6e 67 20 2d 31 2c 20 30 2c 20 6f 72 20 31 ning -1, 0, or 1
0dd0: 0a 20 2a 09 69 66 20 73 31 20 69 73 20 6c 65 78 . *.if s1 is lex
0de0: 69 63 6f 67 72 61 70 68 69 63 61 6c 6c 79 20 6c icographically l
0df0: 65 73 73 20 74 68 61 6e 2c 20 65 71 75 61 6c 20 ess than, equal
0e00: 74 6f 2c 20 6f 72 20 67 72 65 61 74 65 72 0a 20 to, or greater.
0e10: 2a 09 74 68 61 6e 20 73 32 20 6f 76 65 72 20 74 *.than s2 over t
0e20: 68 6f 73 65 20 63 68 61 72 61 63 74 65 72 73 2e hose characters.
0e30: 0a 20 2a 0a 20 2a 20 53 69 64 65 20 65 66 66 65 . *. * Side effe
0e40: 63 74 73 3a 0a 20 2a 09 4e 6f 6e 65 2e 0a 20 2a cts:. *.None.. *
0e50: 0a 20 2a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d . *-------------
0e60: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0e70: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0e80: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0e90: 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 20 2a 2f 0a 0a 69 ---------. */..i
0ea0: 6e 74 0a 73 74 72 6e 63 61 73 65 63 6d 70 28 73 nt.strncasecmp(s
0eb0: 31 2c 20 73 32 2c 20 6c 65 6e 67 74 68 29 0a 20 1, s2, length).
0ec0: 20 20 20 43 4f 4e 53 54 20 63 68 61 72 20 2a 73 CONST char *s
0ed0: 31 3b 09 09 2f 2a 20 46 69 72 73 74 20 73 74 72 1;../* First str
0ee0: 69 6e 67 2e 20 2a 2f 0a 20 20 20 20 43 4f 4e 53 ing. */. CONS
0ef0: 54 20 63 68 61 72 20 2a 73 32 3b 09 09 2f 2a 20 T char *s2;../*
0f00: 53 65 63 6f 6e 64 20 73 74 72 69 6e 67 2e 20 2a Second string. *
0f10: 2f 0a 20 20 20 20 73 69 7a 65 5f 74 20 6c 65 6e /. size_t len
0f20: 67 74 68 3b 09 09 2f 2a 20 4d 61 78 69 6d 75 6d gth;../* Maximum
0f30: 20 6e 75 6d 62 65 72 20 6f 66 20 63 68 61 72 61 number of chara
0f40: 63 74 65 72 73 20 74 6f 20 63 6f 6d 70 61 72 65 cters to compare
0f50: 0a 09 09 09 09 20 2a 20 28 73 74 6f 70 20 65 61 ..... * (stop ea
0f60: 72 6c 69 65 72 20 69 66 20 74 68 65 20 65 6e 64 rlier if the end
0f70: 20 6f 66 20 65 69 74 68 65 72 20 73 74 72 69 6e of either strin
0f80: 67 0a 09 09 09 09 20 2a 20 69 73 20 72 65 61 63 g..... * is reac
0f90: 68 65 64 29 2e 20 2a 2f 0a 7b 0a 20 20 20 20 75 hed). */.{. u
0fa0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 75 31 2c nsigned char u1,
0fb0: 20 75 32 3b 0a 0a 20 20 20 20 66 6f 72 20 28 3b u2;.. for (;
0fc0: 20 6c 65 6e 67 74 68 20 21 3d 20 30 3b 20 6c 65 length != 0; le
0fd0: 6e 67 74 68 2d 2d 2c 20 73 31 2b 2b 2c 20 73 32 ngth--, s1++, s2
0fe0: 2b 2b 29 20 7b 0a 09 75 31 20 3d 20 28 75 6e 73 ++) {..u1 = (uns
0ff0: 69 67 6e 65 64 20 63 68 61 72 29 20 2a 73 31 3b igned char) *s1;
1000: 0a 09 75 32 20 3d 20 28 75 6e 73 69 67 6e 65 64 ..u2 = (unsigned
1010: 20 63 68 61 72 29 20 2a 73 32 3b 0a 09 69 66 20 char) *s2;..if
1020: 28 63 68 61 72 6d 61 70 5b 75 31 5d 20 21 3d 20 (charmap[u1] !=
1030: 63 68 61 72 6d 61 70 5b 75 32 5d 29 20 7b 0a 09 charmap[u2]) {..
1040: 20 20 20 20 72 65 74 75 72 6e 20 63 68 61 72 6d return charm
1050: 61 70 5b 75 31 5d 20 2d 20 63 68 61 72 6d 61 70 ap[u1] - charmap
1060: 5b 75 32 5d 3b 0a 09 7d 0a 09 69 66 20 28 75 31 [u2];..}..if (u1
1070: 20 3d 3d 20 27 5c 30 27 29 20 7b 0a 09 20 20 20 == '\0') {..
1080: 20 72 65 74 75 72 6e 20 30 3b 0a 09 7d 0a 20 20 return 0;..}.
1090: 20 20 7d 0a 20 20 20 20 72 65 74 75 72 6e 20 30 }. return 0
10a0: 3b 0a 7d 0a ;.}.