177 lines
3.1 KiB
C
177 lines
3.1 KiB
C
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <errno.h>
|
|
#include </usr/include/thread.h>
|
|
#undef _POSIX_THREADS
|
|
|
|
|
|
/*
|
|
* Initialization.
|
|
*/
|
|
static void PyThread__init_thread(void)
|
|
{
|
|
}
|
|
|
|
/*
|
|
* Thread support.
|
|
*/
|
|
struct func_arg {
|
|
void (*func)(void *);
|
|
void *arg;
|
|
};
|
|
|
|
static void *
|
|
new_func(void *funcarg)
|
|
{
|
|
void (*func)(void *);
|
|
void *arg;
|
|
|
|
func = ((struct func_arg *) funcarg)->func;
|
|
arg = ((struct func_arg *) funcarg)->arg;
|
|
free(funcarg);
|
|
(*func)(arg);
|
|
return 0;
|
|
}
|
|
|
|
|
|
long
|
|
PyThread_start_new_thread(void (*func)(void *), void *arg)
|
|
{
|
|
thread_t tid;
|
|
struct func_arg *funcarg;
|
|
int success = 0; /* init not needed when SOLARIS_THREADS and */
|
|
/* C_THREADS implemented properly */
|
|
|
|
dprintf(("PyThread_start_new_thread called\n"));
|
|
if (!initialized)
|
|
PyThread_init_thread();
|
|
funcarg = (struct func_arg *) malloc(sizeof(struct func_arg));
|
|
funcarg->func = func;
|
|
funcarg->arg = arg;
|
|
if (thr_create(0, 0, new_func, funcarg,
|
|
THR_DETACHED | THR_NEW_LWP, &tid)) {
|
|
perror("thr_create");
|
|
free((void *) funcarg);
|
|
success = -1;
|
|
}
|
|
return tid;
|
|
}
|
|
|
|
long
|
|
PyThread_get_thread_ident(void)
|
|
{
|
|
if (!initialized)
|
|
PyThread_init_thread();
|
|
return thr_self();
|
|
}
|
|
|
|
static void
|
|
do_PyThread_exit_thread(int no_cleanup)
|
|
{
|
|
dprintf(("PyThread_exit_thread called\n"));
|
|
if (!initialized)
|
|
if (no_cleanup)
|
|
_exit(0);
|
|
else
|
|
exit(0);
|
|
thr_exit(0);
|
|
}
|
|
|
|
void
|
|
PyThread_exit_thread(void)
|
|
{
|
|
do_PyThread_exit_thread(0);
|
|
}
|
|
|
|
void
|
|
PyThread__exit_thread(void)
|
|
{
|
|
do_PyThread_exit_thread(1);
|
|
}
|
|
|
|
#ifndef NO_EXIT_PROG
|
|
static void
|
|
do_PyThread_exit_prog(int status, int no_cleanup)
|
|
{
|
|
dprintf(("PyThread_exit_prog(%d) called\n", status));
|
|
if (!initialized)
|
|
if (no_cleanup)
|
|
_exit(status);
|
|
else
|
|
exit(status);
|
|
if (no_cleanup)
|
|
_exit(status);
|
|
else
|
|
exit(status);
|
|
}
|
|
|
|
void
|
|
PyThread_exit_prog(int status)
|
|
{
|
|
do_PyThread_exit_prog(status, 0);
|
|
}
|
|
|
|
void
|
|
PyThread__exit_prog(int status)
|
|
{
|
|
do_PyThread_exit_prog(status, 1);
|
|
}
|
|
#endif /* NO_EXIT_PROG */
|
|
|
|
/*
|
|
* Lock support.
|
|
*/
|
|
PyThread_type_lock
|
|
PyThread_allocate_lock(void)
|
|
{
|
|
mutex_t *lock;
|
|
|
|
dprintf(("PyThread_allocate_lock called\n"));
|
|
if (!initialized)
|
|
PyThread_init_thread();
|
|
|
|
lock = (mutex_t *) malloc(sizeof(mutex_t));
|
|
if (mutex_init(lock, USYNC_THREAD, 0)) {
|
|
perror("mutex_init");
|
|
free((void *) lock);
|
|
lock = 0;
|
|
}
|
|
dprintf(("PyThread_allocate_lock() -> %p\n", lock));
|
|
return (PyThread_type_lock) lock;
|
|
}
|
|
|
|
void
|
|
PyThread_free_lock(PyThread_type_lock lock)
|
|
{
|
|
dprintf(("PyThread_free_lock(%p) called\n", lock));
|
|
mutex_destroy((mutex_t *) lock);
|
|
free((void *) lock);
|
|
}
|
|
|
|
int
|
|
PyThread_acquire_lock(PyThread_type_lock lock, int waitflag)
|
|
{
|
|
int success;
|
|
|
|
dprintf(("PyThread_acquire_lock(%p, %d) called\n", lock, waitflag));
|
|
if (waitflag)
|
|
success = mutex_lock((mutex_t *) lock);
|
|
else
|
|
success = mutex_trylock((mutex_t *) lock);
|
|
if (success < 0)
|
|
perror(waitflag ? "mutex_lock" : "mutex_trylock");
|
|
else
|
|
success = !success; /* solaris does it the other way round */
|
|
dprintf(("PyThread_acquire_lock(%p, %d) -> %d\n", lock, waitflag, success));
|
|
return success;
|
|
}
|
|
|
|
void
|
|
PyThread_release_lock(PyThread_type_lock lock)
|
|
{
|
|
dprintf(("PyThread_release_lock(%p) called\n", lock));
|
|
if (mutex_unlock((mutex_t *) lock))
|
|
perror("mutex_unlock");
|
|
}
|