1 /*
2 * Copyright 1990 Sun Microsystems, Inc. All rights reserved.
3 * Use is subject to license terms.
4 */
5
6 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
7 /* All Rights Reserved */
8
9 /*
10 * Copyright (c) 1980 Regents of the University of California.
11 * All rights reserved. The Berkeley software License Agreement
12 * specifies the terms and conditions for redistribution.
13 */
14
15 #pragma ident "%Z%%M% %I% %E% SMI"
16
17 /* ts.c: minor string processing subroutines */
18 int
match(char * s1,char * s2)19 match(char *s1, char *s2)
20 {
21 while (*s1 == *s2)
22 if (*s1++ == '\0')
23 return(1);
24 else
25 s2++;
26 return(0);
27 }
28
29 int
prefix(char * small,char * big)30 prefix(char *small, char *big)
31 {
32 int c;
33 while ((c= *small++) == *big++)
34 if (c==0) return(1);
35 return(c==0);
36 }
37
38 int
letter(int ch)39 letter(int ch)
40 {
41 if (ch >= 'a' && ch <= 'z')
42 return(1);
43 if (ch >= 'A' && ch <= 'Z')
44 return(1);
45 return(0);
46 }
47
48 int
numb(char * str)49 numb(char *str)
50 {
51 /* convert to integer */
52 int k;
53 for (k=0; *str >= '0' && *str <= '9'; str++)
54 k = k*10 + *str - '0';
55 return(k);
56 }
57
58 int
digit(int x)59 digit(int x)
60 {
61 return(x>= '0' && x<= '9');
62 }
63
64 int
max(int a,int b)65 max(int a, int b)
66 {
67 return( a>b ? a : b);
68 }
69
70 void
tcopy(char * s,char * t)71 tcopy(char *s, char *t)
72 {
73 while (*s++ = *t++);
74 }
75