1 /*
2 * linux/lib/string.c
3 *
4 * Copyright (C) 1991, 1992 Linus Torvalds
5 */
6
7 /*
8 * stupid library routines.. The optimized versions should generally be found
9 * as inline code in <asm-xx/string.h>
10 *
11 * These are buggy as well..
12 *
13 * * Fri Jun 25 1999, Ingo Oeser <ioe@informatik.tu-chemnitz.de>
14 * - Added strsep() which will replace strtok() soon (because strsep() is
15 * reentrant and should be faster). Use only strsep() in new code, please.
16 */
17
18 #include <linux/types.h>
19 #include <linux/string.h>
20 #include <linux/ctype.h>
21
22 #ifndef __HAVE_ARCH_STRNICMP
23 int strnicmp(const char *s1, const char *s2, size_t len)
24 {
25 /* Yes, Virginia, it had better be unsigned */
26 unsigned char c1, c2;
27
28 c1 = 0; c2 = 0;
29 if (len) {
30 do {
31 c1 = *s1; c2 = *s2;
32 s1++; s2++;
33 if (!c1)
34 break;
35 if (!c2)
36 break;
37 if (c1 == c2)
38 continue;
39 c1 = tolower(c1);
40 c2 = tolower(c2);
41 if (c1 != c2)
42 break;
43 } while (--len);
44 }
45 return (int)c1 - (int)c2;
46 }
47 #endif
48
49 char * ___strtok;
50
51 #ifndef __HAVE_ARCH_STRCPY
52 char * strcpy(char * dest,const char *src)
53 {
54 char *tmp = dest;
55
56 while ((*dest++ = *src++) != '\0')
57 /* nothing */;
58 return tmp;
59 }
60 #endif
61
62 #ifndef __HAVE_ARCH_STRNCPY
63 char * strncpy(char * dest,const char *src,size_t count)
64 {
65 char *tmp = dest;
66
67 while (count-- && (*dest++ = *src++) != '\0')
68 /* nothing */;
69
70 return tmp;
71 }
72 #endif
73
74 #ifndef __HAVE_ARCH_STRCAT
75 char * strcat(char * dest, const char * src)
76 {
77 char *tmp = dest;
78
79 while (*dest)
80 dest++;
81 while ((*dest++ = *src++) != '\0')
82 ;
83
84 return tmp;
85 }
86 #endif
87
88 #ifndef __HAVE_ARCH_STRNCAT
89 char * strncat(char *dest, const char *src, size_t count)
90 {
91 char *tmp = dest;
92
93 if (count) {
94 while (*dest)
95 dest++;
96 while ((*dest++ = *src++)) {
97 if (--count == 0) {
98 *dest = '\0';
99 break;
100 }
101 }
102 }
103
104 return tmp;
105 }
106 #endif
107
108 #ifndef __HAVE_ARCH_STRCMP
109 int strcmp(const char * cs,const char * ct)
110 {
111 register signed char __res;
112
113 while (1) {
114 if ((__res = *cs - *ct++) != 0 || !*cs++)
115 break;
116 }
117
118 return __res;
119 }
120 #endif
121
122 #ifndef __HAVE_ARCH_STRNCMP
123 int strncmp(const char * cs,const char * ct,size_t count)
124 {
125 register signed char __res = 0;
126
127 while (count) {
128 if ((__res = *cs - *ct++) != 0 || !*cs++)
129 break;
130 count--;
131 }
132
133 return __res;
134 }
135 #endif
136
137 #ifndef __HAVE_ARCH_STRCHR
138 char * strchr(const char * s, int c)
139 {
140 for(; *s != (char) c; ++s)
141 if (*s == '\0')
142 return NULL;
143 return (char *) s;
144 }
145 #endif
146
147 #ifndef __HAVE_ARCH_STRRCHR
148 char * strrchr(const char * s, int c)
149 {
150 const char *p = s + strlen(s);
151 do {
152 if (*p == (char)c)
153 return (char *)p;
154 } while (--p >= s);
155 return NULL;
156 }
157 #endif
158
159 #ifndef __HAVE_ARCH_STRLEN
160 size_t strlen(const char * s)
161 {
162 const char *sc;
163
164 for (sc = s; *sc != '\0'; ++sc)
165 /* nothing */;
166 return sc - s;
167 }
168 #endif
169
170 #ifndef __HAVE_ARCH_STRNLEN
171 size_t strnlen(const char * s, size_t count)
172 {
173 const char *sc;
174
175 for (sc = s; count-- && *sc != '\0'; ++sc)
176 /* nothing */;
177 return sc - s;
178 }
179 #endif
180
181 #ifndef __HAVE_ARCH_STRSPN
182 size_t strspn(const char *s, const char *accept)
183 {
184 const char *p;
185 const char *a;
186 size_t count = 0;
187
188 for (p = s; *p != '\0'; ++p) {
189 for (a = accept; *a != '\0'; ++a) {
190 if (*p == *a)
191 break;
192 }
193 if (*a == '\0')
194 return count;
195 ++count;
196 }
197
198 return count;
199 }
200 #endif
201
202 #ifndef __HAVE_ARCH_STRPBRK
203 char * strpbrk(const char * cs,const char * ct)
204 {
205 const char *sc1,*sc2;
206
207 for( sc1 = cs; *sc1 != '\0'; ++sc1) {
208 for( sc2 = ct; *sc2 != '\0'; ++sc2) {
209 if (*sc1 == *sc2)
210 return (char *) sc1;
211 }
212 }
213 return NULL;
214 }
215 #endif
216
217 #ifndef __HAVE_ARCH_STRTOK
218 char * strtok(char * s,const char * ct)
219 {
220 char *sbegin, *send;
221
222 sbegin = s ? s : ___strtok;
223 if (!sbegin) {
224 return NULL;
225 }
226 sbegin += strspn(sbegin,ct);
227 if (*sbegin == '\0') {
228 ___strtok = NULL;
229 return( NULL );
230 }
231 send = strpbrk( sbegin, ct);
232 if (send && *send != '\0')
233 *send++ = '\0';
234 ___strtok = send;
235 return (sbegin);
236 }
237 #endif
238
239 #ifndef __HAVE_ARCH_STRSEP
240
241 char * strsep(char **s, const char * ct)
242 {
243 char *sbegin=*s;
244 if (!sbegin)
245 return NULL;
246
247 sbegin += strspn(sbegin,ct);
248 if (*sbegin == '\0')
249 return NULL;
250
251 *s = strpbrk( sbegin, ct);
252 if (*s && **s != '\0')
253 *(*s)++ = '\0';
254 return (sbegin);
255 }
256 #endif
257
258 #ifndef __HAVE_ARCH_MEMSET
259 void * memset(void * s,int c,size_t count)
260 {
261 char *xs = (char *) s;
262
263 while (count--)
264 *xs++ = c;
265
266 return s;
267 }
268 #endif
269
270 #ifndef __HAVE_ARCH_BCOPY
271 char * bcopy(const char * src, char * dest, int count)
272 {
273 char *tmp = dest;
274
275 while (count--)
276 *tmp++ = *src++;
277
278 return dest;
279 }
280 #endif
281
282 #ifndef __HAVE_ARCH_MEMCPY
283 void * memcpy(void * dest,const void *src,size_t count)
284 {
285 char *tmp = (char *) dest, *s = (char *) src;
286
287 while (count--)
288 *tmp++ = *s++;
289
290 return dest;
291 }
292 #endif
293
294 #ifndef __HAVE_ARCH_MEMMOVE
295 void * memmove(void * dest,const void *src,size_t count)
296 {
297 char *tmp, *s;
298
299 if (dest <= src) {
300 tmp = (char *) dest;
301 s = (char *) src;
302 while (count--)
303 *tmp++ = *s++;
304 }
305 else {
306 tmp = (char *) dest + count;
307 s = (char *) src + count;
308 while (count--)
309 *--tmp = *--s;
310 }
311
312 return dest;
313 }
314 #endif
315
316 #ifndef __HAVE_ARCH_MEMCMP
317 int memcmp(const void * cs,const void * ct,size_t count)
318 {
319 const unsigned char *su1, *su2;
320 signed char res = 0;
321
322 for( su1 = cs, su2 = ct; 0 < count; ++su1, ++su2, count--)
323 if ((res = *su1 - *su2) != 0)
324 break;
325 return res;
326 }
327 #endif
328
329 /*
330 * find the first occurrence of byte 'c', or 1 past the area if none
331 */
332 #ifndef __HAVE_ARCH_MEMSCAN
333 void * memscan(void * addr, int c, size_t size)
334 {
335 unsigned char * p = (unsigned char *) addr;
336
337 while (size) {
338 if (*p == c)
339 return (void *) p;
340 p++;
341 size--;
342 }
343 return (void *) p;
344 }
345 #endif
346
347 #ifndef __HAVE_ARCH_STRSTR
348 char * strstr(const char * s1,const char * s2)
349 {
350 int l1, l2;
351
352 l2 = strlen(s2);
353 if (!l2)
354 return (char *) s1;
355 l1 = strlen(s1);
356 while (l1 >= l2) {
357 l1--;
358 if (!memcmp(s1,s2,l2))
359 return (char *) s1;
360 s1++;
361 }
362 return NULL;
363 }
364 #endif
365
366 #ifndef __HAVE_ARCH_MEMCHR
367 void *memchr(const void *s, int c, size_t n)
368 {
369 const unsigned char *p = s;
370 while (n-- != 0) {
371 if ((unsigned char)c == *p++) {
372 return (void *)(p-1);
373 }
374 }
375 return NULL;
376 }
377
378 #endif
379
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.