1 /* vi: set sw=4 ts=4: */
3 * A _very_ simple clone based pthread-like implementation
5 * Copyright (C) 2001,2002 by Erik Andersen <andersee@debian.org>
7 * This program is free software; you can redistribute it and/or modify it
8 * under the terms of the GNU Library General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or (at your
10 * option) any later version.
12 * This program is distributed in the hope that it will be useful, but WITHOUT
13 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
17 * You should have received a copy of the GNU Library General Public License
18 * along with this program; if not, write to the Free Software Foundation,
19 * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
29 #define STACKSIZE 8096
31 #define CSIGNAL 0x000000ff /* signal mask to be sent at exit */
32 #define CLONE_VM 0x00000100 /* set if VM shared between processes */
33 #define CLONE_FS 0x00000200 /* set if fs info shared between proces ses */
34 #define CLONE_FILES 0x00000400 /* set if open files shared between pro cesses */
35 #define CLONE_SIGHAND 0x00000800 /* set if signal handlers shared */
39 /* Lame home-grown clone based threading */
40 int pthread_mutex_init (pthread_mutex_t *mutex, const pthread_mutexattr_t *mutex_attr)
42 mutex->__m_lock.__spinlock = 1;
46 int pthread_mutex_lock (pthread_mutex_t *mutex)
48 while (mutex->__m_lock.__spinlock == 0) {
51 --(mutex->__m_lock.__spinlock);
55 int pthread_mutex_unlock (pthread_mutex_t *mutex)
57 ++(mutex->__m_lock.__spinlock);
61 int pthread_cond_wait (pthread_cond_t *cond, pthread_mutex_t *mutex)
63 ++(mutex->__m_lock.__spinlock);
64 while (cond->__c_lock.__spinlock == 0) {
67 --(cond->__c_lock.__spinlock);
71 int pthread_cond_signal(pthread_cond_t *cond)
73 ++(cond->__c_lock.__spinlock);
77 int pthread_cond_init(pthread_cond_t *cond, const pthread_condattr_t *cond_attr)
79 cond->__c_lock.__spinlock = 1;
83 int pthread_create(pthread_t *thread, const pthread_attr_t *attr, void* (*fn)(void *), void *data)
87 int (*clonefunc)(void *) = (int (*)(void *))(fn);
89 newstack = (void **) malloc(STACKSIZE);
92 newstack = (void **) (STACKSIZE + (char *) newstack);
94 retval = clone(clonefunc, newstack,
95 CLONE_VM | CLONE_FS | CLONE_FILES | CLONE_SIGHAND | SIGCHLD, data);
107 int pthread_join (pthread_t thread, void **thread_return)
110 /* Fixme -- wait for thread and get its return value */
111 retval = EXIT_SUCCESS;
113 (int)*thread_return = retval;
116 link_warning(pthread_join, "pthread_join is a stub and does not behave properly");
118 void pthread_exit (void *retval)
120 _exit(*(int *)retval);