X-Git-Url: http://git.mutantstargoat.com/user/nuclear/?p=3sys;a=blobdiff_plain;f=sys1%2Fkern%2Fsrc%2Flibc%2Fstring.c;fp=sys1%2Fkern%2Fsrc%2Flibc%2Fstring.c;h=913ffc1feb82ab1ba01c6c1a80e43896d7a47b32;hp=3b11896cf570794d309cef05530eb45b04d3d3bc;hb=d49aa763f9b7c4ae66cf80f0cbfc3456789fc0ac;hpb=3e2e8a9156d288d230bbcd722bc91c4b3e4b21e1

diff --git a/sys1/kern/src/libc/string.c b/sys1/kern/src/libc/string.c
index 3b11896..913ffc1 100644
--- a/sys1/kern/src/libc/string.c
+++ b/sys1/kern/src/libc/string.c
@@ -1,5 +1,6 @@
 #include "string.h"
 #include "stdint.h"
+#include "ctype.h"
 
 void *memset(void *dest, int val, size_t num)
 {
@@ -28,3 +29,205 @@ void *memcpy(void *dest, void *src, size_t num)
 
 	return dest;
 }
+
+void *memmove(void *dest, const void *src, size_t n)
+{
+	int i;
+	char *dptr;
+	const char *sptr;
+
+	if(dest <= src) {
+		/* forward copy */
+		dptr = dest;
+		sptr = src;
+		for(i=0; i<n; i++) {
+			*dptr++ = *sptr++;
+		}
+	} else {
+		/* backwards copy */
+		dptr = (char*)dest + n - 1;
+		sptr = (const char*)src + n - 1;
+		for(i=0; i<n; i++) {
+			*dptr-- = *sptr--;
+		}
+	}
+
+	return dest;
+}
+
+int memcmp(void *aptr, void *bptr, size_t n)
+{
+	int i, startoffs, diff;
+	uint32_t *a32, *b32;
+	unsigned char *a = aptr;
+	unsigned char *b = bptr;
+
+	a32 = (uint32_t*)((intptr_t)(a + 3) & 0xfffffffc);
+	b32 = (uint32_t*)((intptr_t)(b + 3) & 0xfffffffc);
+
+	/* if both are aligned the same way... */
+	if((startoffs = (unsigned char*)a32 - a) == (unsigned char*)b32 - b) {
+		/* catch-up to the 32bit alignment */
+		for(i=0; i<startoffs; i++) {
+			if((diff = *a++ - *b++) != 0 || --n <= 0) {
+				return diff;
+			}
+		}
+
+		/* compare 32bit at once */
+		while(n >= 4) {
+			if(*a32 != *b32) break;
+			a32++;
+			b32++;
+			n -= 4;
+		}
+
+		/* update byte pointers to contine with the tail */
+		a = (unsigned char*)a32;
+		b = (unsigned char*)b32;
+	}
+
+	/* we're here both for the tail-end of same-alignment buffers, or for the
+	 * whole length of mis-aligned buffers.
+	 */
+	while(n-- > 0) {
+		if((diff = *a++ - *b++) != 0) {
+			return diff;
+		}
+	}
+	return 0;
+}
+
+size_t strlen(const char *s)
+{
+	size_t len = 0;
+	while(*s++) len++;
+	return len;
+}
+
+char *strchr(const char *s, int c)
+{
+	while(*s) {
+		if(*s == c) {
+			return (char*)s;
+		}
+		s++;
+	}
+	return 0;
+}
+
+char *strrchr(const char *s, int c)
+{
+	const char *ptr = s;
+
+	/* find the end */
+	while(*ptr) ptr++;
+
+	/* go back checking for c */
+	while(--ptr >= s) {
+		if(*ptr == c) {
+			return (char*)ptr;
+		}
+	}
+	return 0;
+}
+
+char *strstr(const char *str, const char *substr)
+{
+	while(*str) {
+		const char *s1 = str;
+		const char *s2 = substr;
+
+		while(*s1 && *s1 == *s2) {
+			s1++;
+			s2++;
+		}
+		if(!*s2) {
+			return (char*)str;
+		}
+		str++;
+	}
+	return 0;
+}
+
+char *strcasestr(const char *str, const char *substr)
+{
+	while(*str) {
+		const char *s1 = str;
+		const char *s2 = substr;
+
+		while(*s1 && tolower(*s1) == tolower(*s2)) {
+			s1++;
+			s2++;
+		}
+		if(!*s2) {
+			return (char*)str;
+		}
+		str++;
+	}
+	return 0;
+}
+
+int strcmp(const char *s1, const char *s2)
+{
+	while(*s1 && *s1 == *s2) {
+		s1++;
+		s2++;
+	}
+	return *s1 - *s2;
+}
+
+int strcasecmp(const char *s1, const char *s2)
+{
+	while(*s1 && tolower(*s1) == tolower(*s2)) {
+		s1++;
+		s2++;
+	}
+	return tolower(*s1) - tolower(*s2);
+}
+
+int strncmp(const char *s1, const char *s2, int n)
+{
+	if(n <= 0) return 0;
+
+	while(n-- > 0 && *s1 && *s2 && *s1 == *s2) {
+		s1++;
+		s2++;
+	}
+
+	if(n <= 0) return 0;
+	return *s1 - *s2;
+}
+
+int strncasecmp(const char *s1, const char *s2, int n)
+{
+	if(n <= 0) return 0;
+
+	while(n-- > 0 && *s1 && *s2 && tolower(*s1) == tolower(*s2)) {
+		s1++;
+		s2++;
+	}
+
+	if(n <= 0) return 0;
+	return tolower(*s1) - tolower(*s2);
+}
+
+char *strcpy(char *dest, const char *src)
+{
+	char *dptr = dest;
+	while((*dptr++ = *src++));
+	return dest;
+}
+
+char *strcat(char *dest, const char *src)
+{
+	strcpy(dest + strlen(dest), src);
+	return dest;
+}
+
+char *strncpy(char *dest, const char *src, int n)
+{
+	char *dptr = dest;
+	while(n-- > 0 && (*dptr++ = *src++));
+	return dest;
+}