1 /* FILENAME: stdlib.c
\r
3 * Functions normally found in a standard C lib.
\r
5 * 12/28/2005 - added memcmp and memmove
\r
7 * Notes: These functions support ASCII only!!!
\r
13 /****************************************************************/
\r
17 if ((ch == ' ') || (ch == '\t')) /* \n ??? */
\r
23 /****************************************************************/
\r
28 if (((ch >= '0') && (ch <= '9')) ||
\r
29 ((ch >= 'A') && (ch <= 'Z')) ||
\r
30 ((ch >= 'a') && (ch <= 'z')))
\r
36 /****************************************************************/
\r
41 if ((ch >= '0') && (ch <= '9'))
\r
47 /****************************************************************/
\r
52 if ((ch >= 'A') && (ch <= 'Z'))
\r
58 /****************************************************************/
\r
60 strcasecmp (const char *s1, const char *s2)
\r
69 if ((c1 >= 'a') && (c1 <= 'z'))
\r
70 c1 = (char)(c1 - ' ');
\r
71 if ((c2 >= 'a') && (c2 <= 'z'))
\r
72 c2 = (char)(c2 - ' ');
\r
73 if ((result = (c1 - c2)) != 0)
\r
75 if ((c1 == 0) || (c2 == 0))
\r
82 /****************************************************************/
\r
84 stricmp (const char *s1, const char *s2)
\r
86 return (strcasecmp(s1, s2));
\r
89 /****************************************************************/
\r
91 strncasecmp (const char *s1, const char *s2, int n)
\r
101 if ((c1 >= 'a') && (c1 <= 'z'))
\r
102 c1 = (char)(c1 - ' ');
\r
103 if ((c2 >= 'a') && (c2 <= 'z'))
\r
104 c2 = (char)(c2 - ' ');
\r
105 if ((result = (c1 - c2)) != 0)
\r
107 if ((c1 == 0) || (c2 == 0))
\r
113 /****************************************************************/
\r
115 strnicmp (const char *s1, const char *s2, int n)
\r
117 return (strncasecmp(s1, s2, n));
\r
120 /****************************************************************/
\r
122 strtoul (char *str, char **ptr, int base)
\r
124 unsigned long rvalue = 0;
\r
128 /* Validate parameters */
\r
129 if ((str != NULL) && (base >= 0) && (base <= 36))
\r
131 /* Skip leading white spaces */
\r
132 while (isspace(*str))
\r
137 /* Check for notations */
\r
143 if ((str[1] == 'x') || (str[1] == 'X'))
\r
172 /* Valid "digits" are 0..9, A..Z, a..z */
\r
173 while (isalnum(c = *str))
\r
175 /* Convert char to num in 0..36 */
\r
176 if ((c -= ('a' - 10)) < 10) /* 'a'..'z' */
\r
178 if ((c += ('a' - 'A')) < 10) /* 'A'..'Z' */
\r
180 c += ('A' - '0' - 10); /* '0'..'9' */
\r
184 /* check c against base */
\r
192 rvalue = (rvalue * base) - c;
\r
196 rvalue = (rvalue * base) + c;
\r
203 /* Upon exit, 'str' points to the character at which valid info */
\r
204 /* STOPS. No chars including and beyond 'str' are used. */
\r
212 /****************************************************************/
\r
214 atoi (const char *str)
\r
216 char *s = (char *)str;
\r
218 return ((int)strtoul(s, NULL, 10));
\r
221 /****************************************************************/
\r
223 strlen (const char *str)
\r
225 char *s = (char *)str;
\r
231 while (*s++ != '\0')
\r
237 /****************************************************************/
\r
239 strcat (char *dest, const char *src)
\r
242 char *sp = (char *)src;
\r
244 if ((dest != NULL) && (src != NULL))
\r
246 dp = &dest[strlen(dest)];
\r
248 while (*sp != '\0')
\r
257 /****************************************************************/
\r
259 strncat (char *dest, const char *src, int n)
\r
262 char *sp = (char *)src;
\r
264 if ((dest != NULL) && (src != NULL) && (n > 0))
\r
266 dp = &dest[strlen(dest)];
\r
268 while ((*sp != '\0') && (n-- > 0))
\r
277 /****************************************************************/
\r
279 strcpy (char *dest, const char *src)
\r
281 char *dp = (char *)dest;
\r
282 char *sp = (char *)src;
\r
284 if ((dest != NULL) && (src != NULL))
\r
286 while (*sp != '\0')
\r
295 /****************************************************************/
\r
297 strncpy (char *dest, const char *src, int n)
\r
299 char *dp = (char *)dest;
\r
300 char *sp = (char *)src;
\r
302 if ((dest != NULL) && (src != NULL) && (n > 0))
\r
304 while ((*sp != '\0') && (n-- > 0))
\r
313 /****************************************************************/
\r
315 strcmp (const char *s1, const char *s2)
\r
317 /* No checks for NULL */
\r
318 char *s1p = (char *)s1;
\r
319 char *s2p = (char *)s2;
\r
321 while (*s2p != '\0')
\r
329 return (*s1p - *s2p);
\r
332 /****************************************************************/
\r
334 strncmp (const char *s1, const char *s2, int n)
\r
336 /* No checks for NULL */
\r
337 char *s1p = (char *)s1;
\r
338 char *s2p = (char *)s2;
\r
343 while (*s2p != '\0')
\r
354 return (*s1p - *s2p);
\r
357 /****************************************************************/
\r
359 strstr(const char *s1, const char *s2)
\r
361 char *sp = (char *)s1;
\r
362 int len1 = strlen(s1);
\r
363 int len2 = strlen(s2);
\r
365 while (len1 >= len2)
\r
367 if (strncmp(sp, s2, len2) == 0)
\r
378 /****************************************************************/
\r
380 strchr(const char *str, int c)
\r
382 char *sp = (char *)str;
\r
383 char ch = (char)(c & 0xff);
\r
385 while (*sp != '\0')
\r
397 /****************************************************************/
\r
399 memcpy (void *dest, const void *src, unsigned n)
\r
401 unsigned char *dbp = (unsigned char *)dest;
\r
402 unsigned char *sbp = (unsigned char *)src;
\r
404 if ((dest != NULL) && (src != NULL) && (n > 0))
\r
412 /****************************************************************/
\r
414 memset (void *s, int c, unsigned n)
\r
416 /* Not optimized, but very portable */
\r
417 unsigned char *sp = (unsigned char *)s;
\r
419 if ((s != NULL) && (n > 0))
\r
423 *sp++ = (unsigned char)c;
\r
429 /****************************************************************/
\r
431 memcmp (const void *s1, const void *s2, unsigned n)
\r
433 unsigned char *s1p, *s2p;
\r
435 if (s1 && s2 && (n > 0))
\r
437 s1p = (unsigned char *)s1;
\r
438 s2p = (unsigned char *)s2;
\r
440 while ((--n >= 0) && (*s1p == *s2p))
\r
443 return (*s1p - *s2p);
\r
452 /****************************************************************/
\r
454 memmove (void *dest, const void *src, unsigned n)
\r
456 unsigned char *dbp = (unsigned char *)dest;
\r
457 unsigned char *sbp = (unsigned char *)src;
\r
458 unsigned char *dend = dbp + n;
\r
459 unsigned char *send = sbp + n;
\r
461 if ((dest != NULL) && (src != NULL) && (n > 0))
\r
463 /* see if a memcpy would overwrite source buffer */
\r
464 if ((sbp < dbp) && (dbp < send))
\r
467 *(--dend) = *(--send);
\r
479 /****************************************************************/
\r