| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869 |
- /* Adapted from glibc */
- /* Copyright (C) 1996, 1997 Free Software Foundation, Inc. */
- /* clone is even more special than fork as it mucks with stacks
- and invokes a function in the right context after its all over. */
- #define _ERRNO_H
- #include <features.h>
- #include <bits/errno.h>
- #include <sys/syscall.h>
- #include "m68k_pic.S"
- /* int _clone(int (*fn)(void *arg), void *child_stack, int flags, void *arg); */
- .text
- .align 4
- .type clone,@function
- .globl clone;
- clone:
- /* Sanity check arguments. */
- movel #-EINVAL, %d0
- movel 4(%sp), %d1 /* no NULL function pointers */
- movel %d1, %a0
- tstl %d1
- beq.w __syscall_error_trampoline
- movel 8(%sp), %d1 /* no NULL stack pointers */
- movel %d1, %a1
- tstl %d1
- beq.w __syscall_error_trampoline
- /* Allocate space and copy the argument onto the new stack. */
- movel 16(%sp), -(%a1)
- /* Do the system call */
- #if 1 /* defined (CONFIG_COLDFIRE) */
- movel %d2, %d1 /* save %d2 and get stack pointer */
- movel %a1, %d2
- movel %d1, %a1
- #else
- exg %d2, %a1 /* save %d2 and get stack pointer */
- #endif
- movel 12(%sp), %d1 /* get flags */
- movel #__NR_clone, %d0
- trap #0
- #if 1 /* defined (CONFIG_COLDFIRE) */
- movel %d2, %d1 /* restore %d2 */
- movel %a1, %d2
- movel %d1, %a1
- #else
- exg %d2, %a1 /* restore %d2 */
- #endif
- tstl %d0
- bmi.w __syscall_error_trampoline
- beq.w thread_start
- rts
- thread_start:
- /*subl %fp, %fp*/ /* terminate the stack frame */
- jsr (%a0)
- movel %d0, -(%sp)
- movel #__NR_exit, %d0
- trap #0
- /*jsr exit*/
- __syscall_error_trampoline:
- JUMP __syscall_error,%a0
|
