Microblaze port from the uClinux-dist,

contributed by John Williams <jwilliams@itee.uq.edu.au>

1 files changed, 52 insertions, 0 deletions

diff --git a/libc/sysdeps/linux/microblaze/clone.c b/libc/sysdeps/linux/microblaze/clone.c
new file mode 100644
index 000000000..f82cd9dc0
--- /dev/null
+++ b/libc/sysdeps/linux/microblaze/clone.c
@@ -0,0 +1,52 @@
+/*
+ * libc/sysdeps/linux/microblaze/clone.c -- `clone' syscall for linux/microblaze
+ *
+ *  Copyright (C) 2003     John Williams <jwilliams@itee.uq.edu.au>
+ *  Copyright (C) 2002,03  NEC Electronics Corporation
+ *  Copyright (C) 2002,03  Miles Bader <miles@gnu.org>
+ *
+ * This file is subject to the terms and conditions of the GNU Lesser
+ * General Public License.  See the file COPYING.LIB in the main
+ * directory of this archive for more details.
+ *
+ * Written by Miles Bader <miles@gnu.org>
+ * Microblaze port by John Williams
+ */
+
+#include <errno.h>
+#include <sys/syscall.h>
+
+int
+clone (int (*fn)(void *arg), void *child_stack, int flags, void *arg)
+{
+  register unsigned long rval asm (SYSCALL_RET) = -EINVAL;
+
+  if (fn && child_stack)
+    {
+      register unsigned long syscall asm (SYSCALL_NUM);
+      register unsigned long arg0 asm (SYSCALL_ARG0);
+      register unsigned long arg1 asm (SYSCALL_ARG1);
+
+      /* Clone this thread.  */
+      arg0 = flags;
+      arg1 = (unsigned long)child_stack;
+      syscall = __NR_clone;
+      asm volatile ("bralid r17, trap;nop;" 
+		    : "=r" (rval), "=r" (syscall)
+		    : "1" (syscall), "r" (arg0), "r" (arg1)
+		    : SYSCALL_CLOBBERS);
+
+      if (rval == 0)
+	/* In child thread, call FN and exit.  */
+	{
+	  arg0 = (*fn) (arg);
+	  syscall = __NR_exit;
+	  asm volatile ("bralid r17, trap;nop;" 
+			: "=r" (rval), "=r" (syscall)
+			: "1" (syscall), "r" (arg0)
+			: SYSCALL_CLOBBERS);
+	}
+    }
+
+  __syscall_return (int, rval);
+}