Home | History | Annotate | Line # | Download | only in sys
      1  1.8     skrll /*	$NetBSD: __clone.S,v 1.8 2020/05/05 20:43:47 skrll Exp $	*/
      2  1.1  fredette 
      3  1.1  fredette /*-
      4  1.1  fredette  * Copyright (c) 2001 The NetBSD Foundation, Inc.
      5  1.1  fredette  * All rights reserved.
      6  1.1  fredette  *
      7  1.1  fredette  * This code is derived from software contributed to The NetBSD Foundation
      8  1.1  fredette  * by Matt Fredette.
      9  1.1  fredette  *
     10  1.1  fredette  * Redistribution and use in source and binary forms, with or without
     11  1.1  fredette  * modification, are permitted provided that the following conditions
     12  1.1  fredette  * are met:
     13  1.1  fredette  * 1. Redistributions of source code must retain the above copyright
     14  1.1  fredette  *    notice, this list of conditions and the following disclaimer.
     15  1.1  fredette  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.1  fredette  *    notice, this list of conditions and the following disclaimer in the
     17  1.1  fredette  *    documentation and/or other materials provided with the distribution.
     18  1.1  fredette  *
     19  1.1  fredette  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  1.1  fredette  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  1.1  fredette  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  1.1  fredette  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  1.1  fredette  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  1.1  fredette  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  1.1  fredette  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  1.1  fredette  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  1.1  fredette  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  1.1  fredette  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  1.1  fredette  * POSSIBILITY OF SUCH DAMAGE.
     30  1.1  fredette  */
     31  1.1  fredette 
     32  1.1  fredette #include <sys/errno.h>
     33  1.1  fredette #include "SYS.h"
     34  1.1  fredette 
     35  1.1  fredette #ifdef WEAK_ALIAS
     36  1.1  fredette 	WEAK_ALIAS(clone, __clone)
     37  1.1  fredette #endif
     38  1.1  fredette 
     39  1.1  fredette /*
     40  1.1  fredette  * int clone(int (*fn)(void *), void *stack, int flags, void *arg);
     41  1.1  fredette  */
     42  1.1  fredette ENTRY(__clone, 0)
     43  1.5       chs 
     44  1.5       chs 	/*
     45  1.5       chs 	 * Sanity checks: func and stack may not be NULL.
     46  1.5       chs 	 */
     47  1.8     skrll 	comb,=	%r0, %arg0, 8f
     48  1.7     skrll 	 nop
     49  1.8     skrll 	comb,=	%r0, %arg1, 8f
     50  1.7     skrll 	 nop
     51  1.5       chs 
     52  1.5       chs 	/*
     53  1.5       chs 	 * Put the func and arg arguments into a frame in the child's stack.
     54  1.5       chs 	 */
     55  1.5       chs 	ldo	(HPPA_FRAME_SIZE * 2)(%arg1), %arg1
     56  1.5       chs 	stw	%arg0, HPPA_FRAME_ARG(0)(%arg1)
     57  1.5       chs 	stw	%arg3, HPPA_FRAME_ARG(1)(%arg1)
     58  1.5       chs 
     59  1.5       chs 	/*
     60  1.5       chs 	 * The system call expects (flags, stack).
     61  1.5       chs 	 */
     62  1.5       chs 	copy	%arg2, %arg0
     63  1.5       chs 	SYSCALL(__clone)
     64  1.5       chs 	comb,<>,n %r0, %ret1, 9f
     65  1.5       chs 	bv,n	%r0(%rp)
     66  1.5       chs 
     67  1.8     skrll 8:
     68  1.8     skrll 	b	__cerror
     69  1.8     skrll 	 ldi	EINVAL, %t1
     70  1.8     skrll 
     71  1.5       chs 9:	/*
     72  1.5       chs 	 * Child: Reload the function and argument from the new stack.
     73  1.5       chs 	 */
     74  1.5       chs 	ldw	HPPA_FRAME_ARG(0)(%sp), %r22
     75  1.5       chs 	ldw	HPPA_FRAME_ARG(1)(%sp), %arg0
     76  1.5       chs 
     77  1.5       chs 	/* Call the clone's entry point. */
     78  1.5       chs 	stw	%r19, HPPA_FRAME_ARG(2)(%sp)
     79  1.5       chs 	bl	$$dyncall, %r31
     80  1.7     skrll 	 copy	%r31, %rp
     81  1.5       chs 	ldw	HPPA_FRAME_ARG(2)(%sp), %r19
     82  1.5       chs 
     83  1.5       chs 	/* Pass the return value to _exit(). */
     84  1.5       chs 	copy	%ret0, %arg0
     85  1.5       chs 	PIC_CALL(_exit)
     86  1.5       chs 
     87  1.5       chs 	/* NOTREACHED */
     88  1.1  fredette EXIT(__clone)
     89