1 files changed, 104 insertions, 0 deletions
diff --git a/mono/metadata/test-gc-memfuncs.c b/mono/metadata/test-gc-memfuncs.c
new file mode 100644
index 0000000000..a8ccf8833c
--- /dev/null
+++ b/mono/metadata/test-gc-memfuncs.c
@@ -0,0 +1,104 @@
+/*
+ * test-sgen-qsort.c: Unit test for our own bzero/memmove.
+ *
+ * Copyright (C) 2013 Xamarin Inc
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License 2.0 as published by the Free Software Foundation;
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License 2.0 along with this library; if not, write to the Free
+ * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ */
+
+#include "config.h"
+
+#include "metadata/gc-internal.h"
+
+#include <stdlib.h>
+#include <string.h>
+#include <time.h>
+#include <assert.h>
+
+#define POOL_SIZE	2048
+#define START_OFFSET	128
+
+#define BZERO_OFFSETS	64
+#define BZERO_SIZES	256
+
+#define MEMMOVE_SRC_OFFSETS		32
+#define MEMMOVE_DEST_OFFSETS		32
+#define MEMMOVE_SIZES			256
+#define MEMMOVE_NONOVERLAP_START	1024
+
+int
+main (void)
+{
+	unsigned char *random_mem = malloc (POOL_SIZE);
+	unsigned char *reference = malloc (POOL_SIZE);
+	unsigned char *playground = malloc (POOL_SIZE);
+	long *long_random_mem;
+	int i, offset, size, src_offset, dest_offset;
+
+	srandom (time (NULL));
+
+	/* init random memory */
+	long_random_mem = (long*)random_mem;
+	for (i = 0; i < POOL_SIZE / sizeof (long); ++i)
+		long_random_mem [i] = random ();
+
+	/* test bzero */
+	for (offset = 0; offset <= BZERO_OFFSETS; ++offset) {
+		for (size = 0; size <= BZERO_SIZES; ++size) {
+			memcpy (reference, random_mem, POOL_SIZE);
+			memcpy (playground, random_mem, POOL_SIZE);
+
+			bzero (reference + START_OFFSET + offset, size);
+			mono_gc_bzero_atomic (playground + START_OFFSET + offset, size);
+
+			assert (!memcmp (reference, playground, POOL_SIZE));
+		}
+	}
+
+	/* test memmove */
+	for (src_offset = -MEMMOVE_SRC_OFFSETS; src_offset <= MEMMOVE_SRC_OFFSETS; ++src_offset) {
+		for (dest_offset = -MEMMOVE_DEST_OFFSETS; dest_offset <= MEMMOVE_DEST_OFFSETS; ++dest_offset) {
+			for (size = 0; size <= MEMMOVE_SIZES; ++size) {
+				/* overlapping */
+				memcpy (reference, random_mem, POOL_SIZE);
+				memcpy (playground, random_mem, POOL_SIZE);
+
+				memmove (reference + START_OFFSET + dest_offset, reference + START_OFFSET + src_offset, size);
+				mono_gc_memmove_atomic (playground + START_OFFSET + dest_offset, playground + START_OFFSET + src_offset, size);
+
+				assert (!memcmp (reference, playground, POOL_SIZE));
+
+				/* non-overlapping with dest < src */
+				memcpy (reference, random_mem, POOL_SIZE);
+				memcpy (playground, random_mem, POOL_SIZE);
+
+				memmove (reference + START_OFFSET + dest_offset, reference + MEMMOVE_NONOVERLAP_START + src_offset, size);
+				mono_gc_memmove_atomic (playground + START_OFFSET + dest_offset, playground + MEMMOVE_NONOVERLAP_START + src_offset, size);
+
+				assert (!memcmp (reference, playground, POOL_SIZE));
+
+				/* non-overlapping with dest > src */
+				memcpy (reference, random_mem, POOL_SIZE);
+				memcpy (playground, random_mem, POOL_SIZE);
+
+				memmove (reference + MEMMOVE_NONOVERLAP_START + dest_offset, reference + START_OFFSET + src_offset, size);
+				mono_gc_memmove_atomic (playground + MEMMOVE_NONOVERLAP_START + dest_offset, playground + START_OFFSET + src_offset, size);
+
+				assert (!memcmp (reference, playground, POOL_SIZE));
+			}
+		}
+	}
+
+	return 0;
+}