1 /*-
2  * Copyright (c) 2015 Nuxi, https://nuxi.nl/
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  *    notice, this list of conditions and the following disclaimer in the
11  *    documentation and/or other materials provided with the distribution.
12  *
13  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
23  * SUCH DAMAGE.
24  */
25 
26 #include <sys/cdefs.h>
27 __FBSDID("$FreeBSD$");
28 
29 #include <sys/param.h>
30 #include <sys/proc.h>
31 #include <sys/systm.h>
32 
33 #include <contrib/cloudabi/cloudabi32_types.h>
34 
35 #include <compat/cloudabi32/cloudabi32_proto.h>
36 #include <compat/cloudabi32/cloudabi32_util.h>
37 
38 struct thread_create_args {
39 	cloudabi32_threadattr_t attr;
40 	uint32_t tcb;
41 	lwpid_t tid;
42 };
43 
44 static int
initialize_thread(struct thread * td,void * thunk)45 initialize_thread(struct thread *td, void *thunk)
46 {
47 	struct thread_create_args *args = thunk;
48 
49 	/* Save the thread ID, so it can be returned. */
50 	args->tid = td->td_tid;
51 
52 	/* Set up initial register contents. */
53 	return (cloudabi32_thread_setregs(td, &args->attr, args->tcb));
54 }
55 
56 int
cloudabi32_sys_thread_create(struct thread * td,struct cloudabi32_sys_thread_create_args * uap)57 cloudabi32_sys_thread_create(struct thread *td,
58     struct cloudabi32_sys_thread_create_args *uap)
59 {
60 	struct thread_create_args args;
61 	int error;
62 
63 	error = copyin(uap->attr, &args.attr, sizeof(args.attr));
64 	if (error != 0)
65 		return (error);
66 
67 	/* Remove some space on the top of the stack for the TCB. */
68 	args.tcb = rounddown(args.attr.stack + args.attr.stack_len -
69 	    sizeof(cloudabi32_tcb_t), _Alignof(cloudabi32_tcb_t));
70 	args.attr.stack_len = args.tcb - args.attr.stack;
71 
72 	error = thread_create(td, NULL, initialize_thread, &args);
73 	if (error != 0)
74 		return (error);
75 	td->td_retval[0] = args.tid;
76 	return (0);
77 }
78