source: vital-to8-sdk/mc09/src/string.txt @ 1

Last change on this file since 1 was 1, checked in by svn, 6 years ago

Import initial

File size: 1.1 KB
RevLine 
[1]1
2strcat(s,t)
3char *s,*t;
4{       while (*s) ++s;
5        strcpy(s,t);
6}
7
8strcmp(s,t)
9char *s,*t;
10{       for (; *s == *t; ++s,++t) if (!*s) break;
11        return (*s - *t);
12}
13
14strcpy(s,t)
15char *s,*t;
16{       while (*s++ = *t++);
17}
18
19char *gets(s,n)
20char *s;
21int n;
22{       return fgets(s,n,stdin);
23}
24
25puts(s)
26char *s;
27{       return fputs(s,stdout);
28}
29
30char *fgets(s,n,f)
31char *s,*f;
32int n;
33{char c,*t;
34        t = s;
35        while (--n > 0)
36        {       if ((c = getc(f)) == EOF) break;
37                if ((*s++ = c) == '\n') break;
38        }
39        *s = '\0';
40        return ((c == EOF && s == t) ? NULL : s);
41
42}
43
44fputs(s,f)
45char *s,*f;
46{       while (*s) putc(*s++,f);
47}
48
49match(p,s)
50char *p,*s;
51{       switch (*p)
52        {case '*':
53                if (!*(p+1)) return 1;
54                while (!match(p+1,s)) if (!*s++) return 0;
55                return 1;
56         case '?':
57                return (*s ? match(p+1,s+1) : 0);
58         case '\0':
59                return (!*s);
60         default:
61                if (*p == *s) return match(p+1,s+1);
62                return 0;
63        }
64}
Note: See TracBrowser for help on using the repository browser.