iframe-proxy | Sunbelt Computer Software

174 lines (151 loc) · 3.04 KB
#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);
PyThread_start_new_thread(void (*func)(void *), void *arg)
	thread_t tid;
	struct func_arg *funcarg;
	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);
		return -1;
	return tid;
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);
			exit(0);
	thr_exit(0);
PyThread_exit_thread(void)
	do_PyThread_exit_thread(0);
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);
			exit(status);
	if (no_cleanup)
		_exit(status);
		exit(status);
PyThread_exit_prog(int status)
	do_PyThread_exit_prog(status, 0);
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;
PyThread_free_lock(PyThread_type_lock lock)
	dprintf(("PyThread_free_lock(%p) called\n", lock));
	mutex_destroy((mutex_t *) lock);
	free((void *) lock);
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);
		success = mutex_trylock((mutex_t *) lock);
	if (success < 0)
		perror(waitflag ? "mutex_lock" : "mutex_trylock");
		success = !success; /* solaris does it the other way round */
	dprintf(("PyThread_acquire_lock(%p, %d) -> %d\n", lock, waitflag, success));
	return success;
PyThread_release_lock(PyThread_type_lock lock)
	dprintf(("PyThread_release_lock(%p) called\n", lock));
	if (mutex_unlock((mutex_t *) lock))
		perror("mutex_unlock");
Sunbelt Computer Software

PL/B Language Development and Support

Navigation Menu

Sunbelt Computer Software

PL/B Language Development and Support

FilesExpand file tree

thread_solaris.h

Latest commit

History

thread_solaris.h

File metadata and controls
