system/glibc
3
0
Fork 0
Code Issues Projects Releases Wiki Activity

Update.

Browse Source 
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.
This commit is contained in:
Ulrich Drepper 2003-01-28 18:51:03 +00:00
parent e6ebd2e4db
commit db34912eb0
3 changed files with 40 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ChangeLog
View File

@ -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.

37
sysdeps/unix/sysv/linux/s390/s390-32/clone.S
View File

@ -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 */

25
sysdeps/unix/sysv/linux/s390/s390-64/clone.S
View File

@ -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 */