diff options
author | Ulrich Drepper <drepper@redhat.com> | 2003-01-28 18:51:03 +0000 |
---|---|---|
committer | Ulrich Drepper <drepper@redhat.com> | 2003-01-28 18:51:03 +0000 |
commit | db34912eb03df7020a3e607de85bcff431b29348 (patch) | |
tree | ef6b35a2110dd469e6bfa604e94c17898818b0a9 | |
parent | e6ebd2e4db59da6c1726ecfa3516f1f1b3048442 (diff) | |
download | glibc-db34912eb03df7020a3e607de85bcff431b29348.tar glibc-db34912eb03df7020a3e607de85bcff431b29348.tar.gz glibc-db34912eb03df7020a3e607de85bcff431b29348.tar.bz2 glibc-db34912eb03df7020a3e607de85bcff431b29348.zip |
Update.
2003-01-28 Martin Schwidefsky <schwidefsky@de.ibm.com>
* sysdeps/unix/sysv/linux/s390/s390-32/clone.S: Reorder additional
clone parameters to match the order used on ia32.
* sysdeps/unix/sysv/linux/s390/s390-64/clone.S: Likewise.
-rw-r--r-- | ChangeLog | 6 | ||||
-rw-r--r-- | sysdeps/unix/sysv/linux/s390/s390-32/clone.S | 37 | ||||
-rw-r--r-- | sysdeps/unix/sysv/linux/s390/s390-64/clone.S | 25 |
3 files changed, 40 insertions, 28 deletions
@@ -1,3 +1,9 @@ +2003-01-28 Martin Schwidefsky <schwidefsky@de.ibm.com> + + * sysdeps/unix/sysv/linux/s390/s390-32/clone.S: Reorder additional + clone parameters to match the order used on ia32. + * sysdeps/unix/sysv/linux/s390/s390-64/clone.S: Likewise. + 2003-01-27 Martin Schwidefsky <schwidefsky@de.ibm.com> * elf/elf.h: Add new s390 relocs. diff --git a/sysdeps/unix/sysv/linux/s390/s390-32/clone.S b/sysdeps/unix/sysv/linux/s390/s390-32/clone.S index 23fb4647ee..91c362a2e8 100644 --- a/sysdeps/unix/sysv/linux/s390/s390-32/clone.S +++ b/sysdeps/unix/sysv/linux/s390/s390-32/clone.S @@ -25,29 +25,32 @@ #include <bits/errno.h> /* int __clone(int (*fn)(void *arg), void *child_stack, int flags, void *arg, - void *tls, pid_t *parent_tid, pid_t *child_tid); */ + pid_t *parent_tid, void *tls, pid_t *child_tid); */ /* sys_clone (void *child_stack, unsigned long flags, pid_t *parent_tid, pid_t *child_tid, void *tls); */ .text ENTRY(__clone) - /* Sanity check arguments & move registers */ + st %r6,24(%r15) /* store %r6 to save area */ lr %r0,%r5 /* move *arg out of the way */ - ltr %r1,%r2 /* no NULL function pointers */ - lhi %r2,-EINVAL - jz SYSCALL_ERROR_LABEL - ltr %r3,%r3 /* no NULL stack pointers */ - jz SYSCALL_ERROR_LABEL - /* set up registers, then call SVC */ - lr %r2,%r3 - lr %r3,%r4 - lm %r4,%r5,96(%r15) - svc SYS_ify(clone) - ltr %r2,%r2 /* check return code */ - jm SYSCALL_ERROR_LABEL - jz thread_start - br %r14 - + ltr %r1,%r2 /* check fn and move to %r1 */ + jz error /* no NULL function pointers */ + ltr %r2,%r3 /* check child_stack and move to %r2 */ + jz error /* no NULL stack pointers */ + lr %r3,%r4 /* move flags to %r3 */ + lr %r4,%r6 /* move parent_tid to %r4 */ + l %r5,100(%r15) /* load child_tid from stack */ + l %r6,96(%r15) /* load tls from stack */ + svc SYS_ify(clone) + l %r6,24(%r15) /* restore %r6 */ + ltr %r2,%r2 /* check return code */ + jm SYSCALL_ERROR_LABEL + jz thread_start + br %r14 +error: + lhi %r2,-EINVAL + j SYSCALL_ERROR_LABEL + thread_start: /* fn is in gpr 1, arg in gpr 0 */ lr %r2,%r0 /* set first parameter to void *arg */ diff --git a/sysdeps/unix/sysv/linux/s390/s390-64/clone.S b/sysdeps/unix/sysv/linux/s390/s390-64/clone.S index 117411824f..5150540f4e 100644 --- a/sysdeps/unix/sysv/linux/s390/s390-64/clone.S +++ b/sysdeps/unix/sysv/linux/s390/s390-64/clone.S @@ -26,28 +26,31 @@ #include <bits/errno.h> /* int __clone(int (*fn)(void *arg), void *child_stack, int flags, void *arg, - void *tls, pid_t *parent_tid, pid_t *child_tid); */ + pid_t *parent_tid, void *tls, pid_t *child_tid); */ /* sys_clone (void *child_stack, unsigned long flags, pid_t *parent_tid, pid_t *child_tid, void *tls); */ .text ENTRY(__clone) - /* Sanity check arguments & move registers */ + stg %r6,48(%r15) /* store %r6 to save area */ lgr %r0,%r5 /* move *arg out of the way */ - ltgr %r1,%r2 /* no NULL function pointers */ - lghi %r2,-EINVAL - jgz SYSCALL_ERROR_LABEL - ltgr %r3,%r3 /* no NULL stack pointers */ - jgz SYSCALL_ERROR_LABEL - /* set up registers, then call SVC */ - lgr %r2,%r3 - lgr %r3,%r4 - lmg %r4,%r5,160(%r15) + ltgr %r1,%r2 /* check fn and move to %r1 */ + jz error /* no NULL function pointers */ + ltgr %r2,%r3 /* check child_stack and move to %r2 */ + jz error /* no NULL stack pointers */ + lgr %r3,%r4 /* move flags to %r3 */ + lgr %r4,%r6 /* move parent_tid to %r4 */ + lg %r5,168(%r15) /* load child_tid from stack */ + l %r6,160(%r15) /* load tls from stack */ svc SYS_ify(clone) + lg %r6,48(%r15) /* restore %r6 */ ltgr %r2,%r2 /* check return code */ jgm SYSCALL_ERROR_LABEL jz thread_start br %r14 +error: + lghi %r2,-EINVAL + jg SYSCALL_ERROR_LABEL thread_start: /* fn is in gpr 1, arg in gpr 0 */ |