WebSVN – HelenOS-historic – Diff – /uspace/trunk/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.
 */
 
#include <thread.h>
#include <libc.h>
#include <stdlib.h>
#include <arch/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 Thread Local storage area, return pointer to TCB(ThreadControlBlock)
 *
 * !! The code requires, that sections .tdata and .tbss are adjacent.
 *    It may be changed in the future.
 */
tcb_t * __make_tls(void)
{
    void *data;
    tcb_t *tcb;
    size_t tls_size = &_tbss_end - &_tdata_start;
   
    tcb = __alloc_tls(&data, tls_size);
   
    memcpy(data, &_tdata_start, &_tdata_end - &_tdata_start);
    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.
 *
 * TODO: Thread stack pages memory leak
 */
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);
    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 of the new thread on success or -1 on failure.
 */
int thread_create(void (* function)(void *), void *arg, char *name)
{
    char *stack;
    uspace_arg_t *uarg;
 
    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;
   
    return __SYSCALL2(SYS_THREAD_CREATE, (sysarg_t) uarg, (sysarg_t) name);
}
 
/** Terminate current thread.
 *
 * @param stat Exit status. Currently not used.
 */
void thread_exit(int status)
{
    __SYSCALL1(SYS_THREAD_EXIT, (sysarg_t) status);
}
 
 

Rev 1427	Rev 1614
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	#include <thread.h>	29	#include <thread.h>
30	#include <libc.h>	30	#include <libc.h>
31	#include <stdlib.h>	31	#include <stdlib.h>
32	#include <arch/faddr.h>	32	#include <arch/faddr.h>
33	#include <kernel/proc/uarg.h>	33	#include <kernel/proc/uarg.h>
34	#include <psthread.h>	34	#include <psthread.h>
35	#include <string.h>	35	#include <string.h>
36	#include <async.h>	36	#include <async.h>
37		37
38	#include <stdio.h>	38	#include <stdio.h>
39		39
40		40
41	#ifndef THREAD_INITIAL_STACK_PAGES_NO	41	#ifndef THREAD_INITIAL_STACK_PAGES_NO
42	#define THREAD_INITIAL_STACK_PAGES_NO 1	42	#define THREAD_INITIAL_STACK_PAGES_NO 1
43	#endif	43	#endif
44		44
45	static LIST_INITIALIZE(thread_garbage);	45	static LIST_INITIALIZE(thread_garbage);
46		46
47	extern char _tdata_start;	47	extern char _tdata_start;
48	extern char _tdata_end;	48	extern char _tdata_end;
49	extern char _tbss_start;	49	extern char _tbss_start;
50	extern char _tbss_end;	50	extern char _tbss_end;
51		51
52	/** Create Thread Local storage area, return pointer to TCB(ThreadControlBlock)	52	/** Create Thread Local storage area, return pointer to TCB(ThreadControlBlock)
53	*	53	*
54	* !! The code requires, that sections .tdata and .tbss are adjacent.	54	* !! The code requires, that sections .tdata and .tbss are adjacent.
55	* It may be changed in the future.	55	* It may be changed in the future.
56	*/	56	*/
57	tcb_t * __make_tls(void)	57	tcb_t * __make_tls(void)
58	{	58	{
59	void *data;	59	void *data;
60	tcb_t *tcb;	60	tcb_t *tcb;
61	size_t tls_size = &_tbss_end - &_tdata_start;	61	size_t tls_size = &_tbss_end - &_tdata_start;
62		62
63	tcb = __alloc_tls(&data, tls_size);	63	tcb = __alloc_tls(&data, tls_size);
64		64
65	memcpy(data, &_tdata_start, &_tdata_end - &_tdata_start);	65	memcpy(data, &_tdata_start, &_tdata_end - &_tdata_start);
66	memset(data + (&_tbss_start-&_tdata_start), &_tbss_end-&_tbss_start, 0);	66	memset(data + (&_tbss_start-&_tdata_start), 0, &_tbss_end-&_tbss_start);
67		-
68	return tcb;	67	return tcb;
69	}	68	}
70		69
71	void __free_tls(tcb_t *tcb)	70	void __free_tls(tcb_t *tcb)
72	{	71	{
73	size_t tls_size = &_tbss_end - &_tdata_start;	72	size_t tls_size = &_tbss_end - &_tdata_start;
74	__free_tls_arch(tcb, tls_size);	73	__free_tls_arch(tcb, tls_size);
75	}	74	}
76		75
77	/** Main thread function.	76	/** Main thread function.
78	*	77	*
79	* This function is called from __thread_entry() and is used	78	* This function is called from __thread_entry() and is used
80	* to call the thread's implementing function and perform cleanup	79	* to call the thread's implementing function and perform cleanup
81	* and exit when thread returns back. Do not call this function	80	* and exit when thread returns back. Do not call this function
82	* directly.	81	* directly.
83	*	82	*
84	* @param uarg Pointer to userspace argument structure.	83	* @param uarg Pointer to userspace argument structure.
85	*	84	*
86	* TODO: Thread stack pages memory leak	85	* TODO: Thread stack pages memory leak
87	*/	86	*/
88	void __thread_main(uspace_arg_t *uarg)	87	void __thread_main(uspace_arg_t *uarg)
89	{	88	{
90	psthread_data_t *pt;	89	psthread_data_t *pt;
91		90
92	pt = psthread_setup();	91	pt = psthread_setup();
93	__tcb_set(pt->tcb);	92	__tcb_set(pt->tcb);
94		93
95	uarg->uspace_thread_function(uarg->uspace_thread_arg);	94	uarg->uspace_thread_function(uarg->uspace_thread_arg);
96	free(uarg->uspace_stack);	95	free(uarg->uspace_stack);
97	free(uarg);	96	free(uarg);
98		97
99	/* If there is a manager, destroy it */	98	/* If there is a manager, destroy it */
100	async_destroy_manager();	99	async_destroy_manager();
101	psthread_teardown(pt);	100	psthread_teardown(pt);
102		101
103	thread_exit(0);	102	thread_exit(0);
104	}	103	}
105		104
106	/** Create userspace thread.	105	/** Create userspace thread.
107	*	106	*
108	* This function creates new userspace thread and allocates userspace	107	* This function creates new userspace thread and allocates userspace
109	* stack and userspace argument structure for it.	108	* stack and userspace argument structure for it.
110	*	109	*
111	* @param function Function implementing the thread.	110	* @param function Function implementing the thread.
112	* @param arg Argument to be passed to thread.	111	* @param arg Argument to be passed to thread.
113	* @param name Symbolic name of the thread.	112	* @param name Symbolic name of the thread.
114	*	113	*
115	* @param TID of the new thread on success or -1 on failure.	114	* @param TID of the new thread on success or -1 on failure.
116	*/	115	*/
117	int thread_create(void (* function)(void ), void arg, char *name)	116	int thread_create(void (* function)(void ), void arg, char *name)
118	{	117	{
119	char *stack;	118	char *stack;
120	uspace_arg_t *uarg;	119	uspace_arg_t *uarg;
121		120
122	stack = (char ) malloc(getpagesize()THREAD_INITIAL_STACK_PAGES_NO);	121	stack = (char ) malloc(getpagesize()THREAD_INITIAL_STACK_PAGES_NO);
123	if (!stack)	122	if (!stack)
124	return -1;	123	return -1;
125		124
126	uarg = (uspace_arg_t *) malloc(sizeof(uspace_arg_t));	125	uarg = (uspace_arg_t *) malloc(sizeof(uspace_arg_t));
127	if (!uarg) {	126	if (!uarg) {
128	free(stack);	127	free(stack);
129	return -1;	128	return -1;
130	}	129	}
131		130
132	uarg->uspace_entry = (void *) FADDR(__thread_entry);	131	uarg->uspace_entry = (void *) FADDR(__thread_entry);
133	uarg->uspace_stack = (void *) stack;	132	uarg->uspace_stack = (void *) stack;
134	uarg->uspace_thread_function = function;	133	uarg->uspace_thread_function = function;
135	uarg->uspace_thread_arg = arg;	134	uarg->uspace_thread_arg = arg;
136	uarg->uspace_uarg = uarg;	135	uarg->uspace_uarg = uarg;
137		136
138	return __SYSCALL2(SYS_THREAD_CREATE, (sysarg_t) uarg, (sysarg_t) name);	137	return __SYSCALL2(SYS_THREAD_CREATE, (sysarg_t) uarg, (sysarg_t) name);
139	}	138	}
140		139
141	/** Terminate current thread.	140	/** Terminate current thread.
142	*	141	*
143	* @param stat Exit status. Currently not used.	142	* @param stat Exit status. Currently not used.
144	*/	143	*/
145	void thread_exit(int status)	144	void thread_exit(int status)
146	{	145	{
147	__SYSCALL1(SYS_THREAD_EXIT, (sysarg_t) status);	146	__SYSCALL1(SYS_THREAD_EXIT, (sysarg_t) status);
148	}	147	}
149		148
150		149

Subversion Repositories HelenOS-historic

(root)/uspace/trunk/libc/generic/thread.c @ 1653 – Rev 1427 → 1614