X-Git-Url: http://git.mutantstargoat.com/user/nuclear/?p=retrocrawl;a=blobdiff_plain;f=src%2Famiga%2Flibc%2Fstring.c;fp=src%2Famiga%2Flibc%2Fstring.c;h=9260cca39f50fb0a8cd5d40f55d34d58c5672512;hp=0000000000000000000000000000000000000000;hb=08dc7cfecb35a6893f7f8d96196859593272da3b;hpb=fa6997608f790933b3d4bb9f55d17084f77dfc16

diff --git a/src/amiga/libc/string.c b/src/amiga/libc/string.c
new file mode 100644
index 0000000..9260cca
--- /dev/null
+++ b/src/amiga/libc/string.c
@@ -0,0 +1,116 @@
+#include <string.h>
+#include <ctype.h>
+
+void memset(void *s, int c, size_t n)
+{
+	char *ptr = s;
+	while(n--) {
+		*ptr++ = c;
+	}
+}
+
+void *memcpy(void *dest, const void *src, size_t n)
+{
+	char *dptr = dest;
+	const char *sptr = src;
+
+	while(n--) {
+		*dptr++ = *sptr++;
+	}
+	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 = (char*)src + n - 1;
+		for(i=0; i<n; i++) {
+			*dptr-- = *sptr--;
+		}
+	}
+
+	return dest;
+}
+
+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;
+}
+
+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);
+}