Home | History | Annotate | Line # | Download | only in netbsd32
      1 /*	$NetBSD: netbsd32_lwp.c,v 1.24 2026/09/20 13:45:00 riastradh Exp $	*/
      2 
      3 /*
      4  *  Copyright (c) 2005, 2006, 2007, 2020 The NetBSD Foundation.
      5  *  All rights reserved.
      6  *
      7  *  Redistribution and use in source and binary forms, with or without
      8  *  modification, are permitted provided that the following conditions
      9  *  are met:
     10  *  1. Redistributions of source code must retain the above copyright
     11  *     notice, this list of conditions and the following disclaimer.
     12  *  2. Redistributions in binary form must reproduce the above copyright
     13  *     notice, this list of conditions and the following disclaimer in the
     14  *     documentation and/or other materials provided with the distribution.
     15  *
     16  *  THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     17  *  ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     18  *  TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     19  *  PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     20  *  BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     21  *  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     22  *  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     23  *  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     24  *  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     25  *  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     26  *  POSSIBILITY OF SUCH DAMAGE.
     27  */
     28 
     29 #include <sys/cdefs.h>
     30 __KERNEL_RCSID(0, "$NetBSD: netbsd32_lwp.c,v 1.24 2026/09/20 13:45:00 riastradh Exp $");
     31 
     32 #include <sys/types.h>
     33 #include <sys/param.h>
     34 #include <sys/systm.h>
     35 #include <sys/kernel.h>
     36 #include <sys/dirent.h>
     37 #include <sys/mount.h>
     38 #include <sys/proc.h>
     39 #include <sys/syscallargs.h>
     40 #include <sys/lwpctl.h>
     41 
     42 #include <compat/netbsd32/netbsd32.h>
     43 #include <compat/netbsd32/netbsd32_syscallargs.h>
     44 #include <compat/netbsd32/netbsd32_conv.h>
     45 
     46 /* Sycalls conversion */
     47 
     48 int
     49 netbsd32__lwp_create(struct lwp *l, const struct netbsd32__lwp_create_args *uap, register_t *retval)
     50 {
     51 	/* {
     52 		syscallarg(const netbsd32_ucontextp) ucp;
     53 		syscallarg(netbsd32_u_long) flags;
     54 		syscallarg(netbsd32_lwpidp) new_lwp;
     55 	} */
     56 	struct proc *p = l->l_proc;
     57 	ucontext32_t *newuc = NULL;
     58 	lwp_t *l2;
     59 	int error;
     60 
     61 	KASSERT(p->p_emul->e_ucsize == sizeof(*newuc));
     62 
     63 	newuc = kmem_alloc(sizeof(ucontext_t), KM_SLEEP);
     64 	error = copyin(SCARG_P32(uap, ucp), newuc, p->p_emul->e_ucsize);
     65 	if (error)
     66 		goto fail;
     67 
     68 	/* validate the ucontext */
     69 	if ((newuc->uc_flags & _UC_CPU) == 0) {
     70 		error = EINVAL;
     71 		goto fail;
     72 	}
     73 	error = cpu_mcontext32_validate(l, &newuc->uc_mcontext);
     74 	if (error)
     75 		goto fail;
     76 
     77 	const sigset_t *sigmask = newuc->uc_flags & _UC_SIGMASK ?
     78 	    &newuc->uc_sigmask : &l->l_sigmask;
     79 
     80 	error = do_lwp_create(l, newuc, SCARG(uap, flags), &l2, sigmask,
     81 	    &SS_INIT);
     82 	if (error != 0)
     83 		goto fail;
     84 
     85 	error = copyout(&l2->l_lid, SCARG_P32(uap, new_lwp),
     86 	    sizeof(l2->l_lid));
     87 	if (error == 0) {
     88 		lwp_start(l2, SCARG(uap, flags));
     89 		return 0;
     90 	}
     91 	lwp_exit(l2);
     92  fail:
     93 	kmem_free(newuc, sizeof(ucontext_t));
     94 	return error;
     95 }
     96 
     97 int
     98 netbsd32__lwp_wait(struct lwp *l, const struct netbsd32__lwp_wait_args *uap, register_t *retval)
     99 {
    100 	/* {
    101 		syscallarg(lwpid_t) wait_for;
    102 		syscallarg(netbsd32_lwpidp) departed;
    103 	} */
    104 	struct sys__lwp_wait_args ua;
    105 
    106 	memset(&ua, 0, sizeof(ua));
    107 	NETBSD32TO64_UAP(wait_for);
    108 	NETBSD32TOP_UAP(departed, lwpid_t);
    109 	return sys__lwp_wait(l, &ua, retval);
    110 }
    111 
    112 int
    113 netbsd32__lwp_suspend(struct lwp *l, const struct netbsd32__lwp_suspend_args *uap, register_t *retval)
    114 {
    115 	/* {
    116 		syscallarg(lwpid_t) target;
    117 	} */
    118 	struct sys__lwp_suspend_args ua;
    119 
    120 	memset(&ua, 0, sizeof(ua));
    121 	NETBSD32TO64_UAP(target);
    122 	return sys__lwp_suspend(l, &ua, retval);
    123 }
    124 
    125 int
    126 netbsd32__lwp_continue(struct lwp *l, const struct netbsd32__lwp_continue_args *uap, register_t *retval)
    127 {
    128 	/* {
    129 		syscallarg(lwpid_t) target;
    130 	} */
    131 	struct sys__lwp_continue_args ua;
    132 
    133 	memset(&ua, 0, sizeof(ua));
    134 	NETBSD32TO64_UAP(target);
    135 	return sys__lwp_continue(l, &ua, retval);
    136 }
    137 
    138 int
    139 netbsd32__lwp_wakeup(struct lwp *l, const struct netbsd32__lwp_wakeup_args *uap, register_t *retval)
    140 {
    141 	/* {
    142 		syscallarg(lwpid_t) target;
    143 	} */
    144 	struct sys__lwp_wakeup_args ua;
    145 
    146 	memset(&ua, 0, sizeof(ua));
    147 	NETBSD32TO64_UAP(target);
    148 	return sys__lwp_wakeup(l, &ua, retval);
    149 }
    150 
    151 int
    152 netbsd32__lwp_setprivate(struct lwp *l, const struct netbsd32__lwp_setprivate_args *uap, register_t *retval)
    153 {
    154 	/* {
    155 		syscallarg(netbsd32_voidp) ptr;
    156 	} */
    157 	struct sys__lwp_setprivate_args ua;
    158 
    159 	memset(&ua, 0, sizeof(ua));
    160 	NETBSD32TOP_UAP(ptr, void);
    161 	return sys__lwp_setprivate(l, &ua, retval);
    162 }
    163 
    164 int
    165 netbsd32____lwp_park60(struct lwp *l,
    166     const struct netbsd32____lwp_park60_args *uap, register_t *retval)
    167 {
    168 	/* {
    169 		syscallarg(const netbsd32_clockid_t) clock_id;
    170 		syscallarg(int) flags;
    171 		syscallarg(const netbsd32_timespec50p) ts;
    172 		syscallarg(netbsd32_lwpid_t) unpark;
    173 		syscallarg(netbsd32_voidp) hint;
    174 		syscallarg(netbsd32_voidp) unparkhint;
    175 	} */
    176 	struct timespec ts, *tsp;
    177 	struct netbsd32_timespec ts32;
    178 	int ret;
    179 	int error;
    180 
    181 	if (SCARG_P32(uap, ts) == NULL)
    182 		tsp = NULL;
    183 	else {
    184 		error = copyin(SCARG_P32(uap, ts), &ts32, sizeof ts32);
    185 		if (error != 0)
    186 			return error;
    187 		netbsd32_to_timespec(&ts32, &ts);
    188 		tsp = &ts;
    189 	}
    190 
    191 	if (SCARG(uap, unpark) != 0) {
    192 		error = lwp_unpark(&SCARG(uap, unpark), 1);
    193 		if (error != 0)
    194 			return error;
    195 	}
    196 
    197 	ret = lwp_park(SCARG(uap, clock_id), SCARG(uap, flags), tsp);
    198 	if (SCARG_P32(uap, ts) != NULL && (SCARG(uap, flags) & TIMER_ABSTIME) == 0) {
    199 		netbsd32_from_timespec(&ts, &ts32);
    200 		(void)copyout(&ts32, SCARG_P32(uap, ts), sizeof(ts32));
    201 	}
    202 	return ret;
    203 }
    204 
    205 int
    206 netbsd32__lwp_kill(struct lwp *l, const struct netbsd32__lwp_kill_args *uap, register_t *retval)
    207 {
    208 	/* {
    209 		syscallarg(lwpid_t) target;
    210 		syscallarg(int) signo;
    211 	} */
    212 	struct sys__lwp_kill_args ua;
    213 
    214 	memset(&ua, 0, sizeof(ua));
    215 	NETBSD32TO64_UAP(target);
    216 	NETBSD32TO64_UAP(signo);
    217 	return sys__lwp_kill(l, &ua, retval);
    218 }
    219 int
    220 netbsd32__lwp_detach(struct lwp *l, const struct netbsd32__lwp_detach_args *uap, register_t *retval)
    221 {
    222 	/* {
    223 		syscallarg(lwpid_t) target;
    224 	} */
    225 	struct sys__lwp_detach_args ua;
    226 
    227 	memset(&ua, 0, sizeof(ua));
    228 	NETBSD32TO64_UAP(target);
    229 	return sys__lwp_detach(l, &ua, retval);
    230 }
    231 
    232 int
    233 netbsd32__lwp_unpark(struct lwp *l, const struct netbsd32__lwp_unpark_args *uap, register_t *retval)
    234 {
    235 	/* {
    236 		syscallarg(lwpid_t) target;
    237 		syscallarg(netbsd32_voidp) hint;
    238 	} */
    239 	struct sys__lwp_unpark_args ua;
    240 
    241 	memset(&ua, 0, sizeof(ua));
    242 	NETBSD32TO64_UAP(target);
    243 	NETBSD32TOP_UAP(hint, void);
    244 	return sys__lwp_unpark(l, &ua, retval);
    245 }
    246 
    247 int
    248 netbsd32__lwp_unpark_all(struct lwp *l, const struct netbsd32__lwp_unpark_all_args *uap, register_t *retval)
    249 {
    250 	/* {
    251 		syscallarg(const netbsd32_lwpidp) targets;
    252 		syscallarg(netbsd32_size_t) ntargets;
    253 		syscallarg(netbsd32_voidp) hint;
    254 	} */
    255 	struct sys__lwp_unpark_all_args ua;
    256 
    257 	memset(&ua, 0, sizeof(ua));
    258 	NETBSD32TOP_UAP(targets, const lwpid_t);
    259 	NETBSD32TOX_UAP(ntargets, size_t);
    260 	NETBSD32TOP_UAP(hint, void);
    261 	return sys__lwp_unpark_all(l, &ua, retval);
    262 }
    263 
    264 int
    265 netbsd32__lwp_setname(struct lwp *l, const struct netbsd32__lwp_setname_args *uap, register_t *retval)
    266 {
    267 	/* {
    268 		syscallarg(lwpid_t) target;
    269 		syscallarg(const netbsd32_charp) name;
    270 	} */
    271 	struct sys__lwp_setname_args ua;
    272 
    273 	memset(&ua, 0, sizeof(ua));
    274 	NETBSD32TO64_UAP(target);
    275 	NETBSD32TOP_UAP(name, char *);
    276 	return sys__lwp_setname(l, &ua, retval);
    277 }
    278 
    279 int
    280 netbsd32__lwp_getname(struct lwp *l, const struct netbsd32__lwp_getname_args *uap, register_t *retval)
    281 {
    282 	/* {
    283 		syscallarg(lwpid_t) target;
    284 		syscallarg(netbsd32_charp) name;
    285 		syscallarg(netbsd32_size_t) len;
    286 	} */
    287 	struct sys__lwp_getname_args ua;
    288 
    289 	memset(&ua, 0, sizeof(ua));
    290 	NETBSD32TO64_UAP(target);
    291 	NETBSD32TOP_UAP(name, char *);
    292 	NETBSD32TOX_UAP(len, size_t);
    293 	return sys__lwp_getname(l, &ua, retval);
    294 }
    295 
    296 int
    297 netbsd32__lwp_ctl(struct lwp *l, const struct netbsd32__lwp_ctl_args *uap, register_t *retval)
    298 {
    299 	/* {
    300 		syscallarg(int) features;
    301 		syscallarg(netbsd32_pointer_t) address;
    302 	} */
    303 	netbsd32_pointer_t vaddr32;
    304 	int error, features;
    305 	vaddr_t vaddr;
    306 
    307 	features = SCARG(uap, features);
    308 	features &= ~(LWPCTL_FEATURE_CURCPU | LWPCTL_FEATURE_PCTR);
    309 	if (features != 0)
    310 		return ENODEV;
    311 	if ((error = lwp_ctl_alloc(&vaddr)) != 0)
    312 		return error;
    313 	NETBSD32PTR32(vaddr32, (void *)vaddr);
    314 	return copyout(&vaddr32, SCARG_P32(uap, address), sizeof(vaddr32));
    315 }
    316