diff options
author | Waldemar Brodkorb <wbx@openadk.org> | 2015-02-14 23:11:05 -0600 |
---|---|---|
committer | Waldemar Brodkorb <wbx@uclibc-ng.org> | 2015-12-05 21:10:30 +0100 |
commit | d2ac3a6b3a2d2369bec4bf9f0555ebbe72e7bdf5 (patch) | |
tree | d3a6afebcc602f01e07e3970b4305fba4871f358 /libc/sysdeps/linux/vax/clone.S | |
parent | 2fbe1ee66ad2107866d3fddd014c1349d135b424 (diff) |
good bye vax
I mailed with Jan-Benedict Glaw, it seems VAX on Linux
is really a lot of work todo and uClibc support didn't work ever.
Diffstat (limited to 'libc/sysdeps/linux/vax/clone.S')
-rw-r--r-- | libc/sysdeps/linux/vax/clone.S | 84 |
1 files changed, 0 insertions, 84 deletions
diff --git a/libc/sysdeps/linux/vax/clone.S b/libc/sysdeps/linux/vax/clone.S deleted file mode 100644 index 6eb1927b9..000000000 --- a/libc/sysdeps/linux/vax/clone.S +++ /dev/null @@ -1,84 +0,0 @@ -/* Copyright (C) 1996, 1997, 1998, 1999 Free Software Foundation, Inc. - - The GNU C Library is free software; you can redistribute it and/or - modify it under the terms of the GNU Library General Public License as - published by the Free Software Foundation; either version 2 of the - License, or (at your option) any later version. - - The GNU C 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 along with the GNU C Library; see the file COPYING.LIB. If not, - see <http://www.gnu.org/licenses/>. */ - -/* clone() is even more special than fork() as it mucks with stacks - and invokes a function in the right context after its all over. */ - -#include <sys/syscall.h> - -#warning "This file contains a hardcoded constant for SYS_clone" - -.section .rodata - .align 2 -.LC0: .long 120 /* SYS_clone */ -.align 4 -.text -.type clone,@function -.globl clone; -clone: - .word 0x0040 - /* subl2 $8, %sp */ - movl 4(%ap), %r1 - movl 8(%ap), %r0 - mcoml $21, %r6 - - /* Sanity check args. */ - tstl %r1 - jeql CLONE_ERROR_LABEL - tstl %r0 - jeql CLONE_ERROR_LABEL - - /* Need to setup the child stack the same as the parent. */ - subl2 $24, %r0 - movl 16(%ap), 20(%r0) - movl %r1, 16(%r0) - movl %r0, %r1 - addl2 $16, %r1 - movl %r1, 12(%r0) - - /* Do the system call. */ - pushl %ap - pushl %r0 - pushl 12(%ap) - pushl $0x2 - movl %sp, %ap - chmk .LC0 /* %r0 .LC0 -4(%fp) -8(%fp) */ - addl2 $12, %sp - movl (%sp)+, %ap - movl %r0, %r6 - jneq CLONE_ERROR_LABEL - - movl $0, %fp - pushl 4(%ap) - movl (%r1), %r0 - calls $1, (%r0) - pushl %r0 - calls $1, HIDDEN_JUMPTARGET(_exit) - -CLONE_ERROR_LABEL: - cmpl %r6, $-126 /* -ENOKEY?!?! Fuck, this must be wrong! FIXME */ - jlequ CLONE_RETURN_LABEL - calls $0, __errno_location - mnegl %r6, (%r0) - mcoml $0, %r6 - movl %r6, %r0 - ret - -CLONE_RETURN_LABEL: - ret - -.size clone,.-clone - |