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