1 /* Copyright (C) 2000-2002 by George Williams */
2 /*
3  * Redistribution and use in source and binary forms, with or without
4  * modification, are permitted provided that the following conditions are met:
5 
6  * Redistributions of source code must retain the above copyright notice, this
7  * list of conditions and the following disclaimer.
8 
9  * Redistributions in binary form must reproduce the above copyright notice,
10  * this list of conditions and the following disclaimer in the documentation
11  * and/or other materials provided with the distribution.
12 
13  * The name of the author may not be used to endorse or promote products
14  * derived from this software without specific prior written permission.
15 
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
17  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
18  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
19  * EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
20  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
21  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
22  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
23  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
24  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
25  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26  */
27 #include <utype.h>
28 #include "ustring.h"
29 #include <stdlib.h>
30 #include <string.h>
31 
strstart(const char * initial,const char * full)32 char *strstart(const char *initial, const char *full) {
33     int ch1, ch2;
34     for (;;) {
35 	ch1 = *initial++; ch2 = *full++ ;
36 	if ( ch1=='\0' )
37 return( (char *) full );
38 	if ( ch1!=ch2 || ch1=='\0' )
39 return(NULL);
40     }
41 }
42 
strstartmatch(const char * initial,const char * full)43 char *strstartmatch(const char *initial, const char *full) {
44     int ch1, ch2;
45     for (;;) {
46 	ch1 = *initial++; ch2 = *full++ ;
47 	if ( ch1=='\0' )
48 return( (char *) full );
49 	ch1 = tolower(ch1);
50 	ch2 = tolower(ch2);
51 	if ( ch1!=ch2 || ch1=='\0' )
52 return(NULL);
53     }
54 }
55 
strmatch(const char * str1,const char * str2)56 int strmatch(const char *str1, const char *str2) {
57     int ch1, ch2;
58     for (;;) {
59 	ch1 = *str1++; ch2 = *str2++ ;
60 	ch1 = tolower(ch1);
61 	ch2 = tolower(ch2);
62 	if ( ch1!=ch2 || ch1=='\0' )
63 return(ch1-ch2);
64     }
65 }
66 
strnmatch(const char * str1,const char * str2,int n)67 int strnmatch(const char *str1, const char *str2, int n) {
68     int ch1, ch2;
69     for (;n-->0;) {
70 	ch1 = *str1++; ch2 = *str2++ ;
71 	ch1 = tolower(ch1);
72 	ch2 = tolower(ch2);
73 	if ( ch1!=ch2 || ch1=='\0' )
74 return(ch1-ch2);
75     }
76 return(0);
77 }
78 
strstrmatch(const char * longer,const char * substr)79 char *strstrmatch(const char *longer, const char *substr) {
80     int ch1, ch2;
81     const char *lpt, *str1, *str2;
82 
83     for ( lpt=longer; *lpt!='\0'; ++lpt ) {
84 	str1 = lpt; str2 = substr;
85 	for (;;) {
86 	    ch1 = *str1++; ch2 = *str2++ ;
87 	    ch1 = tolower(ch1);
88 	    ch2 = tolower(ch2);
89 	    if ( ch2=='\0' )
90 return((char *) lpt);
91 	    if ( ch1!=ch2 )
92 	break;
93 	}
94     }
95 return( NULL );
96 }
97