xref: /haiku/src/system/libroot/posix/libstdthreads/thrd.c (revision 2710b4f5d4251c5cf88c82b0114ea99b0ef46d22)
1 /*-
2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3  *
4  * Copyright (c) 2011 Ed Schouten <ed@FreeBSD.org>
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 AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  *
28  * $FreeBSD$
29  */
30 
31 #include <threads.h>
32 
33 #include <pthread.h>
34 #include <stdint.h>
35 #include <stdlib.h>
36 
37 #include <errno.h>
38 
39 struct thrd_param {
40 	thrd_start_t	 func;
41 	void		*arg;
42 };
43 
44 static void *
thrd_entry(void * arg)45 thrd_entry(void *arg)
46 {
47 	struct thrd_param tp;
48 
49 	tp = *(struct thrd_param *)arg;
50 	free(arg);
51 	return ((void *)(intptr_t)tp.func(tp.arg));
52 }
53 
54 int
thrd_create(thrd_t * thr,thrd_start_t func,void * arg)55 thrd_create(thrd_t *thr, thrd_start_t func, void *arg)
56 {
57 	struct thrd_param *tp;
58 
59 	/*
60 	 * Work around return type inconsistency.  Wrap execution using
61 	 * a function conforming to pthread_create()'s start_routine.
62 	 */
63 	tp = malloc(sizeof(*tp));
64 	if (tp == NULL)
65 		return (thrd_nomem);
66 	tp->func = func;
67 	tp->arg = arg;
68 	if (pthread_create(thr, NULL, thrd_entry, tp) != 0) {
69 		free(tp);
70 		return (thrd_error);
71 	}
72 	return (thrd_success);
73 }
74 
75 thrd_t
thrd_current(void)76 thrd_current(void)
77 {
78 
79 	return (pthread_self());
80 }
81 
82 int
thrd_detach(thrd_t thr)83 thrd_detach(thrd_t thr)
84 {
85 
86 	if (pthread_detach(thr) != 0)
87 		return (thrd_error);
88 	return (thrd_success);
89 }
90 
91 int
thrd_equal(thrd_t thr0,thrd_t thr1)92 thrd_equal(thrd_t thr0, thrd_t thr1)
93 {
94 
95 	return (pthread_equal(thr0, thr1));
96 }
97 
98 _Noreturn void
thrd_exit(int res)99 thrd_exit(int res)
100 {
101 
102 	pthread_exit((void *)(intptr_t)res);
103 }
104 
105 int
thrd_join(thrd_t thr,int * res)106 thrd_join(thrd_t thr, int *res)
107 {
108 	void *value_ptr;
109 
110 	if (pthread_join(thr, &value_ptr) != 0)
111 		return (thrd_error);
112 	if (res != NULL)
113 		*res = (intptr_t)value_ptr;
114 	return (thrd_success);
115 }
116 
117 int
thrd_sleep(const struct timespec * duration,struct timespec * remaining)118 thrd_sleep(const struct timespec *duration, struct timespec *remaining)
119 {
120 
121 	return (nanosleep(duration, remaining));
122 }
123 
124 void
thrd_yield(void)125 thrd_yield(void)
126 {
127 
128 	sched_yield();
129 }
130