1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
|
/* Slooow, but small string operations, so that we don't have
to link libc5/glibc in.
Originally from linux/lib/string.c, which is
Copyright (C) 1991, 1992 Linus Torvalds
*/
#ifndef __SIZE_TYPE__
#define __SIZE_TYPE__ long unsigned int
#endif
typedef __SIZE_TYPE__ size_t;
char * strncpy(char *dest, const char *src, int count)
{
char *tmp = dest;
while (count-- && (*dest++ = *src++) != '\0')
/* nothing */;
return tmp;
}
char *strcat(char *dest, const char *src)
{
char *tmp = dest;
while (*dest) dest++;
while ((*dest++ = *src++) != '\0');
return tmp;
}
int strncmp(const char *cs,const char *ct,int count)
{
register signed char __res = 0;
while (count) {
if ((__res = *cs - *ct++) != 0 || !*cs++)
break;
count--;
}
return __res;
}
char *strchr(const char *s, int c)
{
for(; *s != (char) c; ++s)
if (*s == '\0')
return 0;
return (char *) s;
}
char * strrchr(const char * s, int c)
{
const char *p = s + strlen(s);
do {
if (*p == (char)c)
return (char *)p;
} while (--p >= s);
return 0;
}
int strlen(const char *s)
{
const char *sc;
for (sc = s; *sc != '\0'; ++sc);
return sc - s;
}
char *strdup(const char *str)
{
extern void *malloc(int);
char *ret;
ret = malloc(strlen(str) + 1);
strcpy(ret, str);
return ret;
}
__inline__ int tolower(int c)
{
if (c >= 'A' && c <= 'Z') return c - 'A' + 'a';
return c;
}
int strcasecmp(const char *cs,const char *ct)
{
register signed char __res;
while (1)
if ((__res = tolower(*cs) - tolower(*ct++)) != 0 || !*cs++)
break;
return __res;
}
int strncasecmp(const char *cs,const char *ct,size_t n)
{
register signed char __res = 0;
while (n--)
if ((__res = tolower(*cs) - tolower(*ct++)) != 0 || !*cs++)
break;
return __res;
}
__inline__ int memcmp(const void *cs, const void *ct, size_t count)
{
const unsigned char *su1, *su2;
signed char res = 0;
for( su1 = cs, su2 = ct; 0 < count; ++su1, ++su2, count--)
if ((res = *su1 - *su2) != 0)
break;
return res;
}
char * strstr(const char * s1,const char * s2)
{
int l1, l2;
l2 = strlen(s2);
if (!l2)
return (char *) s1;
l1 = strlen(s1);
while (l1 >= l2) {
l1--;
if (!memcmp(s1,s2,l2))
return (char *) s1;
s1++;
}
return 0;
}
/* These two are not exactly stringops... */
unsigned long time(void)
{
return 0; /* I think this is never actually used */
}
void *realloc(void *p, int size)
{
return 0; /* We do not support this */
}
|