WebSVN – HelenOS – Diff – /trunk/uspace/libc/generic/thread.c


/*
 * Copyright (c) 2006 Jakub Jermar
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
/** @addtogroup libc
 * @{
 */
/** @file
 */
 
#include <thread.h>
#include <libc.h>
#include <stdlib.h>
#include <libarch/faddr.h>
#include <kernel/proc/uarg.h>
#include <psthread.h>
#include <string.h>
#include <async.h>
 
#include <stdio.h>
 
 
#ifndef THREAD_INITIAL_STACK_PAGES_NO
#define THREAD_INITIAL_STACK_PAGES_NO 1
#endif
 
static LIST_INITIALIZE(thread_garbage);
 
extern char _tdata_start;
extern char _tdata_end;
extern char _tbss_start;
extern char _tbss_end;
 
/** Create TLS (Thread Local Storage) data structures.
 *
 * The code requires, that sections .tdata and .tbss are adjacent. It may be
 * changed in the future.
 *
 * @return Pointer to TCB.
 */
tcb_t *__make_tls(void)
{
    void *data;
    tcb_t *tcb;
    size_t tls_size = &_tbss_end - &_tdata_start;
   
    tcb = __alloc_tls(&data, tls_size);
   
    /*
     * Copy thread local data from the initialization image.
     */
    memcpy(data, &_tdata_start, &_tdata_end - &_tdata_start);
    /*
     * Zero out the thread local uninitialized data.
     */
    memset(data + (&_tbss_start - &_tdata_start), 0,
        &_tbss_end - &_tbss_start);
 
    return tcb;
}
 
void __free_tls(tcb_t *tcb)
{
    size_t tls_size = &_tbss_end - &_tdata_start;
    __free_tls_arch(tcb, tls_size);
}
 
/** Main thread function.
 *
 * This function is called from __thread_entry() and is used
 * to call the thread's implementing function and perform cleanup
 * and exit when thread returns back. Do not call this function
 * directly.
 *
 * @param uarg Pointer to userspace argument structure.
 */
void __thread_main(uspace_arg_t *uarg)
{
    psthread_data_t *pt;
 
    pt = psthread_setup();
    __tcb_set(pt->tcb);
   
    uarg->uspace_thread_function(uarg->uspace_thread_arg);
    /* XXX: we cannot free the userspace stack while running on it */
//  free(uarg->uspace_stack);
//  free(uarg);
 
    /* If there is a manager, destroy it */
    async_destroy_manager();
    psthread_teardown(pt);
 
    thread_exit(0);
}
 
/** Create userspace thread.
 *
 * This function creates new userspace thread and allocates userspace
 * stack and userspace argument structure for it.
 *
 * @param function Function implementing the thread.
 * @param arg Argument to be passed to thread.
 * @param name Symbolic name of the thread.
 * @param tid Thread ID of the newly created thread.
 *
 * @return Zero on success or a code from @ref errno.h on failure.
 */
int thread_create(void (* function)(void *), void *arg, char *name,
    thread_id_t *tid)
{
    char *stack;
    uspace_arg_t *uarg;
    int rc;
 
    stack = (char *) malloc(getpagesize() * THREAD_INITIAL_STACK_PAGES_NO);
    if (!stack)
        return -1;
       
    uarg = (uspace_arg_t *) malloc(sizeof(uspace_arg_t));
    if (!uarg) {
        free(stack);
        return -1;
    }
   
    uarg->uspace_entry = (void *) FADDR(__thread_entry);
    uarg->uspace_stack = (void *) stack;
    uarg->uspace_thread_function = function;
    uarg->uspace_thread_arg = arg;
    uarg->uspace_uarg = uarg;
   
    rc = __SYSCALL3(SYS_THREAD_CREATE, (sysarg_t) uarg, (sysarg_t) name,
        (sysarg_t) tid);
   
    if (rc) {
        /*
         * Failed to create a new thread.
         * Free up the allocated structures.
         */
        free(uarg);
        free(stack);
    }
 
    return rc;
}
 
/** Terminate current thread.
 *
 * @param status Exit status. Currently not used.
 */
void thread_exit(int status)
{
    __SYSCALL1(SYS_THREAD_EXIT, (sysarg_t) status);
}
 
/** Detach thread.
 *
 * Currently not implemented.
 *
 * @param thread TID.
 */
void thread_detach(thread_id_t thread)
{
}
 
/** Join thread.
 *
 * Currently not implemented.
 *
 * @param thread TID.
 *
 * @return Thread exit status.
 */
int thread_join(thread_id_t thread)
{
}
 
/** Get current thread ID.
 *
 * @return Current thread ID.
 */
thread_id_t thread_get_id(void)
{
    thread_id_t thread_id;
 
    (void) __SYSCALL1(SYS_THREAD_GET_ID, (sysarg_t) &thread_id);
 
    return thread_id;
}
 
/** @}
 */
 

Rev 2469	Rev 2470
1	/*	1	/*
2	* Copyright (c) 2006 Jakub Jermar	2	* Copyright (c) 2006 Jakub Jermar
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	13	* documentation and/or other materials provided with the distribution.
14	* - The name of the author may not be used to endorse or promote products	14	* - The name of the author may not be used to endorse or promote products
15	* derived from this software without specific prior written permission.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29	/** @addtogroup libc	29	/** @addtogroup libc
30	* @{	30	* @{
31	*/	31	*/
32	/** @file	32	/** @file
33	*/	33	*/
34		34
35	#include <thread.h>	35	#include <thread.h>
36	#include <libc.h>	36	#include <libc.h>
37	#include <stdlib.h>	37	#include <stdlib.h>
38	#include <libarch/faddr.h>	38	#include <libarch/faddr.h>
39	#include <kernel/proc/uarg.h>	39	#include <kernel/proc/uarg.h>
40	#include <psthread.h>	40	#include <psthread.h>
41	#include <string.h>	41	#include <string.h>
42	#include <async.h>	42	#include <async.h>
43		43
44	#include <stdio.h>	44	#include <stdio.h>
45		45
46		46
47	#ifndef THREAD_INITIAL_STACK_PAGES_NO	47	#ifndef THREAD_INITIAL_STACK_PAGES_NO
48	#define THREAD_INITIAL_STACK_PAGES_NO 1	48	#define THREAD_INITIAL_STACK_PAGES_NO 1
49	#endif	49	#endif
50		50
51	static LIST_INITIALIZE(thread_garbage);	51	static LIST_INITIALIZE(thread_garbage);
52		52
53	extern char _tdata_start;	53	extern char _tdata_start;
54	extern char _tdata_end;	54	extern char _tdata_end;
55	extern char _tbss_start;	55	extern char _tbss_start;
56	extern char _tbss_end;	56	extern char _tbss_end;
57		57
58	/** Create TLS (Thread Local Storage) data structures.	58	/** Create TLS (Thread Local Storage) data structures.
59	*	59	*
60	* The code requires, that sections .tdata and .tbss are adjacent. It may be	60	* The code requires, that sections .tdata and .tbss are adjacent. It may be
61	* changed in the future.	61	* changed in the future.
62	*	62	*
63	* @return Pointer to TCB.	63	* @return Pointer to TCB.
64	*/	64	*/
65	tcb_t *__make_tls(void)	65	tcb_t *__make_tls(void)
66	{	66	{
67	void *data;	67	void *data;
68	tcb_t *tcb;	68	tcb_t *tcb;
69	size_t tls_size = &_tbss_end - &_tdata_start;	69	size_t tls_size = &_tbss_end - &_tdata_start;
70		70
71	tcb = __alloc_tls(&data, tls_size);	71	tcb = __alloc_tls(&data, tls_size);
72		72
73	/*	73	/*
74	* Copy thread local data from the initialization image.	74	* Copy thread local data from the initialization image.
75	*/	75	*/
76	memcpy(data, &_tdata_start, &_tdata_end - &_tdata_start);	76	memcpy(data, &_tdata_start, &_tdata_end - &_tdata_start);
77	/*	77	/*
78	* Zero out the thread local uninitialized data.	78	* Zero out the thread local uninitialized data.
79	*/	79	*/
80	memset(data + (&_tbss_start - &_tdata_start), 0,	80	memset(data + (&_tbss_start - &_tdata_start), 0,
81	&_tbss_end - &_tbss_start);	81	&_tbss_end - &_tbss_start);
82		82
83	return tcb;	83	return tcb;
84	}	84	}
85		85
86	void __free_tls(tcb_t *tcb)	86	void __free_tls(tcb_t *tcb)
87	{	87	{
88	size_t tls_size = &_tbss_end - &_tdata_start;	88	size_t tls_size = &_tbss_end - &_tdata_start;
89	__free_tls_arch(tcb, tls_size);	89	__free_tls_arch(tcb, tls_size);
90	}	90	}
91		91
92	/** Main thread function.	92	/** Main thread function.
93	*	93	*
94	* This function is called from __thread_entry() and is used	94	* This function is called from __thread_entry() and is used
95	* to call the thread's implementing function and perform cleanup	95	* to call the thread's implementing function and perform cleanup
96	* and exit when thread returns back. Do not call this function	96	* and exit when thread returns back. Do not call this function
97	* directly.	97	* directly.
98	*	98	*
99	* @param uarg Pointer to userspace argument structure.	99	* @param uarg Pointer to userspace argument structure.
100	*/	100	*/
101	void __thread_main(uspace_arg_t *uarg)	101	void __thread_main(uspace_arg_t *uarg)
102	{	102	{
103	psthread_data_t *pt;	103	psthread_data_t *pt;
104		104
105	pt = psthread_setup();	105	pt = psthread_setup();
106	__tcb_set(pt->tcb);	106	__tcb_set(pt->tcb);
107		107
108	uarg->uspace_thread_function(uarg->uspace_thread_arg);	108	uarg->uspace_thread_function(uarg->uspace_thread_arg);
109	/* XXX: we cannot free the userspace stack while running on it */	109	/* XXX: we cannot free the userspace stack while running on it */
110	free(uarg->uspace_stack);	110	// free(uarg->uspace_stack);
111	free(uarg);	111	// free(uarg);
112		112
113	/* If there is a manager, destroy it */	113	/* If there is a manager, destroy it */
114	async_destroy_manager();	114	async_destroy_manager();
115	psthread_teardown(pt);	115	psthread_teardown(pt);
116		116
117	thread_exit(0);	117	thread_exit(0);
118	}	118	}
119		119
120	/** Create userspace thread.	120	/** Create userspace thread.
121	*	121	*
122	* This function creates new userspace thread and allocates userspace	122	* This function creates new userspace thread and allocates userspace
123	* stack and userspace argument structure for it.	123	* stack and userspace argument structure for it.
124	*	124	*
125	* @param function Function implementing the thread.	125	* @param function Function implementing the thread.
126	* @param arg Argument to be passed to thread.	126	* @param arg Argument to be passed to thread.
127	* @param name Symbolic name of the thread.	127	* @param name Symbolic name of the thread.
128	* @param tid Thread ID of the newly created thread.	128	* @param tid Thread ID of the newly created thread.
129	*	129	*
130	* @return Zero on success or a code from @ref errno.h on failure.	130	* @return Zero on success or a code from @ref errno.h on failure.
131	*/	131	*/
132	int thread_create(void (* function)(void ), void arg, char *name,	132	int thread_create(void (* function)(void ), void arg, char *name,
133	thread_id_t *tid)	133	thread_id_t *tid)
134	{	134	{
135	char *stack;	135	char *stack;
136	uspace_arg_t *uarg;	136	uspace_arg_t *uarg;
137	int rc;	137	int rc;
138		138
139	stack = (char ) malloc(getpagesize() THREAD_INITIAL_STACK_PAGES_NO);	139	stack = (char ) malloc(getpagesize() THREAD_INITIAL_STACK_PAGES_NO);
140	if (!stack)	140	if (!stack)
141	return -1;	141	return -1;
142		142
143	uarg = (uspace_arg_t *) malloc(sizeof(uspace_arg_t));	143	uarg = (uspace_arg_t *) malloc(sizeof(uspace_arg_t));
144	if (!uarg) {	144	if (!uarg) {
145	free(stack);	145	free(stack);
146	return -1;	146	return -1;
147	}	147	}
148		148
149	uarg->uspace_entry = (void *) FADDR(__thread_entry);	149	uarg->uspace_entry = (void *) FADDR(__thread_entry);
150	uarg->uspace_stack = (void *) stack;	150	uarg->uspace_stack = (void *) stack;
151	uarg->uspace_thread_function = function;	151	uarg->uspace_thread_function = function;
152	uarg->uspace_thread_arg = arg;	152	uarg->uspace_thread_arg = arg;
153	uarg->uspace_uarg = uarg;	153	uarg->uspace_uarg = uarg;
154		154
155	rc = __SYSCALL3(SYS_THREAD_CREATE, (sysarg_t) uarg, (sysarg_t) name,	155	rc = __SYSCALL3(SYS_THREAD_CREATE, (sysarg_t) uarg, (sysarg_t) name,
156	(sysarg_t) tid);	156	(sysarg_t) tid);
157		157
158	if (rc) {	158	if (rc) {
159	/*	159	/*
160	* Failed to create a new thread.	160	* Failed to create a new thread.
161	* Free up the allocated structures.	161	* Free up the allocated structures.
162	*/	162	*/
163	free(uarg);	163	free(uarg);
164	free(stack);	164	free(stack);
165	}	165	}
166		166
167	return rc;	167	return rc;
168	}	168	}
169		169
170	/** Terminate current thread.	170	/** Terminate current thread.
171	*	171	*
172	* @param status Exit status. Currently not used.	172	* @param status Exit status. Currently not used.
173	*/	173	*/
174	void thread_exit(int status)	174	void thread_exit(int status)
175	{	175	{
176	__SYSCALL1(SYS_THREAD_EXIT, (sysarg_t) status);	176	__SYSCALL1(SYS_THREAD_EXIT, (sysarg_t) status);
177	}	177	}
178		178
179	/** Detach thread.	179	/** Detach thread.
180	*	180	*
181	* Currently not implemented.	181	* Currently not implemented.
182	*	182	*
183	* @param thread TID.	183	* @param thread TID.
184	*/	184	*/
185	void thread_detach(thread_id_t thread)	185	void thread_detach(thread_id_t thread)
186	{	186	{
187	}	187	}
188		188
189	/** Join thread.	189	/** Join thread.
190	*	190	*
191	* Currently not implemented.	191	* Currently not implemented.
192	*	192	*
193	* @param thread TID.	193	* @param thread TID.
194	*	194	*
195	* @return Thread exit status.	195	* @return Thread exit status.
196	*/	196	*/
197	int thread_join(thread_id_t thread)	197	int thread_join(thread_id_t thread)
198	{	198	{
199	}	199	}
200		200
201	/** Get current thread ID.	201	/** Get current thread ID.
202	*	202	*
203	* @return Current thread ID.	203	* @return Current thread ID.
204	*/	204	*/
205	thread_id_t thread_get_id(void)	205	thread_id_t thread_get_id(void)
206	{	206	{
207	thread_id_t thread_id;	207	thread_id_t thread_id;
208		208
209	(void) __SYSCALL1(SYS_THREAD_GET_ID, (sysarg_t) &thread_id);	209	(void) __SYSCALL1(SYS_THREAD_GET_ID, (sysarg_t) &thread_id);
210		210
211	return thread_id;	211	return thread_id;
212	}	212	}
213		213
214	/** @}	214	/** @}
215	*/	215	*/
216		216

Subversion Repositories HelenOS

(root)/trunk/uspace/libc/generic/thread.c – Rev 2469 → 2470