libc testsuite + fixes

git-svn-id: svn://kolibrios.org@6433 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/develop/ktcc/trunk/libctest/string_memcpy.c

@@ -0,0 +1,56 @@
+#include <string.h>
+#include <stdlib.h>
+//#include <stdint.h>
+#include "test.h"
+
+static char buf[512];
+
+static void *(*volatile pmemcpy)(void *restrict, const void *restrict2, size_t);
+
+static void *aligned(void *p) {
+	return (void*)(((uintptr_t)p + 63) & -64U);
+}
+
+#define N 80
+static void test_align(int dalign, int salign, int len)
+{
+	char *src = aligned(buf);
+	char *dst = aligned(buf + 128);
+	char *want = aligned(buf + 256);
+	char *p;
+	int i;
+
+	if (salign + len > N || dalign + len > N)
+		abort();
+	for (i = 0; i < N; i++) {
+		src[i] = '#';
+		dst[i] = want[i] = ' ';
+	}
+	for (i = 0; i < len; i++)
+		src[salign+i] = want[dalign+i] = '0'+i;
+	p = pmemcpy(dst+dalign, src+salign, len);
+	if (p != dst+dalign)
+		t_error("memcpy(%p,...) returned %p\n", dst+dalign, p);
+	for (i = 0; i < N; i++)
+		if (dst[i] != want[i]) {
+			t_error("memcpy(align %d, align %d, %d) failed\n", dalign, salign, len);
+			t_printf("got : %.*s\n", dalign+len+1, dst);
+			t_printf("want: %.*s\n", dalign+len+1, want);
+			break;
+		}
+}
+
+int main(void)
+{
+	int i,j,k;
+
+	pmemcpy = memcpy;
+
+	for (i = 0; i < 16; i++)
+		for (j = 0; j < 16; j++)
+			for (k = 0; k < 64; k++)
+				test_align(i,j,k);
+
+	printf("%s finished\n", __FILE__);
+	return t_status;
+}