aboutsummaryrefslogtreecommitdiff
path: root/sysdeps/unix
diff options
context:
space:
mode:
Diffstat (limited to 'sysdeps/unix')
-rw-r--r--sysdeps/unix/sysv/linux/s390/s390-32/clone.S37
-rw-r--r--sysdeps/unix/sysv/linux/s390/s390-64/clone.S25
2 files changed, 34 insertions, 28 deletions
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 */