#include "multiprocessing.h"
#ifdef HAVE_SYS_TIME_H
# include <sys/time.h>
#endif
#ifdef HAVE_MP_SEMAPHORE
enum { … };
SemLockObject;
#include "clinic/semaphore.c.h"
#define ISMINE(o) …
#ifdef MS_WINDOWS
#define SEM_FAILED …
#define SEM_CLEAR_ERROR …
#define SEM_GET_LAST_ERROR …
#define SEM_CREATE …
#define SEM_CLOSE …
#define SEM_GETVALUE …
#define SEM_UNLINK …
static int
_GetSemaphoreValue(HANDLE handle, long *value)
{
long previous;
switch (WaitForSingleObjectEx(handle, 0, FALSE)) {
case WAIT_OBJECT_0:
if (!ReleaseSemaphore(handle, 1, &previous))
return MP_STANDARD_ERROR;
*value = previous + 1;
return 0;
case WAIT_TIMEOUT:
*value = 0;
return 0;
default:
return MP_STANDARD_ERROR;
}
}
static PyObject *
_multiprocessing_SemLock_acquire_impl(SemLockObject *self, int blocking,
PyObject *timeout_obj)
{
double timeout;
DWORD res, full_msecs, nhandles;
HANDLE handles[2], sigint_event;
if (!blocking) {
full_msecs = 0;
} else if (timeout_obj == Py_None) {
full_msecs = INFINITE;
} else {
timeout = PyFloat_AsDouble(timeout_obj);
if (PyErr_Occurred())
return NULL;
timeout *= 1000.0;
if (timeout < 0.0) {
timeout = 0.0;
} else if (timeout >= 0.5 * INFINITE) {
PyErr_SetString(PyExc_OverflowError,
"timeout is too large");
return NULL;
}
full_msecs = (DWORD)(timeout + 0.5);
}
if (self->kind == RECURSIVE_MUTEX && ISMINE(self)) {
++self->count;
Py_RETURN_TRUE;
}
if (WaitForSingleObjectEx(self->handle, 0, FALSE) == WAIT_OBJECT_0) {
self->last_tid = GetCurrentThreadId();
++self->count;
Py_RETURN_TRUE;
}
nhandles = 0;
handles[nhandles++] = self->handle;
if (_PyOS_IsMainThread()) {
sigint_event = _PyOS_SigintEvent();
assert(sigint_event != NULL);
handles[nhandles++] = sigint_event;
}
else {
sigint_event = NULL;
}
Py_BEGIN_ALLOW_THREADS
if (sigint_event != NULL)
ResetEvent(sigint_event);
res = WaitForMultipleObjectsEx(nhandles, handles, FALSE, full_msecs, FALSE);
Py_END_ALLOW_THREADS
switch (res) {
case WAIT_TIMEOUT:
Py_RETURN_FALSE;
case WAIT_OBJECT_0 + 0:
self->last_tid = GetCurrentThreadId();
++self->count;
Py_RETURN_TRUE;
case WAIT_OBJECT_0 + 1:
errno = EINTR;
return PyErr_SetFromErrno(PyExc_OSError);
case WAIT_FAILED:
return PyErr_SetFromWindowsErr(0);
default:
PyErr_Format(PyExc_RuntimeError, "WaitForSingleObject() or "
"WaitForMultipleObjects() gave unrecognized "
"value %u", res);
return NULL;
}
}
static PyObject *
_multiprocessing_SemLock_release_impl(SemLockObject *self)
{
if (self->kind == RECURSIVE_MUTEX) {
if (!ISMINE(self)) {
PyErr_SetString(PyExc_AssertionError, "attempt to "
"release recursive lock not owned "
"by thread");
return NULL;
}
if (self->count > 1) {
--self->count;
Py_RETURN_NONE;
}
assert(self->count == 1);
}
if (!ReleaseSemaphore(self->handle, 1, NULL)) {
if (GetLastError() == ERROR_TOO_MANY_POSTS) {
PyErr_SetString(PyExc_ValueError, "semaphore or lock "
"released too many times");
return NULL;
} else {
return PyErr_SetFromWindowsErr(0);
}
}
--self->count;
Py_RETURN_NONE;
}
#else
#define SEM_CLEAR_ERROR() …
#define SEM_GET_LAST_ERROR() …
#define SEM_CREATE(name, val, max) …
#define SEM_CLOSE(sem) …
#define SEM_GETVALUE(sem, pval) …
#define SEM_UNLINK(name) …
#ifdef __APPLE__
# undef SEM_FAILED
#define SEM_FAILED …
#endif
#ifndef HAVE_SEM_UNLINK
#define sem_unlink …
#endif
#ifndef HAVE_SEM_TIMEDWAIT
#define sem_timedwait …
static int
sem_timedwait_save(sem_t *sem, struct timespec *deadline, PyThreadState *_save)
{
int res;
unsigned long delay, difference;
struct timeval now, tvdeadline, tvdelay;
errno = 0;
tvdeadline.tv_sec = deadline->tv_sec;
tvdeadline.tv_usec = deadline->tv_nsec / 1000;
for (delay = 0 ; ; delay += 1000) {
if (sem_trywait(sem) == 0)
return 0;
else if (errno != EAGAIN)
return MP_STANDARD_ERROR;
if (gettimeofday(&now, NULL) < 0)
return MP_STANDARD_ERROR;
if (tvdeadline.tv_sec < now.tv_sec ||
(tvdeadline.tv_sec == now.tv_sec &&
tvdeadline.tv_usec <= now.tv_usec)) {
errno = ETIMEDOUT;
return MP_STANDARD_ERROR;
}
difference = (tvdeadline.tv_sec - now.tv_sec) * 1000000 +
(tvdeadline.tv_usec - now.tv_usec);
if (delay > 20000)
delay = 20000;
if (delay > difference)
delay = difference;
tvdelay.tv_sec = delay / 1000000;
tvdelay.tv_usec = delay % 1000000;
if (select(0, NULL, NULL, NULL, &tvdelay) < 0)
return MP_STANDARD_ERROR;
Py_BLOCK_THREADS
res = PyErr_CheckSignals();
Py_UNBLOCK_THREADS
if (res) {
errno = EINTR;
return MP_EXCEPTION_HAS_BEEN_SET;
}
}
}
#endif
static PyObject *
_multiprocessing_SemLock_acquire_impl(SemLockObject *self, int blocking,
PyObject *timeout_obj)
{ … }
static PyObject *
_multiprocessing_SemLock_release_impl(SemLockObject *self)
{ … }
#endif
static PyObject *
newsemlockobject(PyTypeObject *type, SEM_HANDLE handle, int kind, int maxvalue,
char *name)
{ … }
static PyObject *
_multiprocessing_SemLock_impl(PyTypeObject *type, int kind, int value,
int maxvalue, const char *name, int unlink)
{ … }
static PyObject *
_multiprocessing_SemLock__rebuild_impl(PyTypeObject *type, SEM_HANDLE handle,
int kind, int maxvalue,
const char *name)
{ … }
static void
semlock_dealloc(SemLockObject* self)
{ … }
static PyObject *
_multiprocessing_SemLock__count_impl(SemLockObject *self)
{ … }
static PyObject *
_multiprocessing_SemLock__is_mine_impl(SemLockObject *self)
{ … }
static PyObject *
_multiprocessing_SemLock__get_value_impl(SemLockObject *self)
{ … }
static PyObject *
_multiprocessing_SemLock__is_zero_impl(SemLockObject *self)
{ … }
static PyObject *
_multiprocessing_SemLock__after_fork_impl(SemLockObject *self)
{ … }
static PyObject *
_multiprocessing_SemLock___enter___impl(SemLockObject *self)
{ … }
static PyObject *
_multiprocessing_SemLock___exit___impl(SemLockObject *self,
PyObject *exc_type,
PyObject *exc_value, PyObject *exc_tb)
{ … }
static int
semlock_traverse(SemLockObject *s, visitproc visit, void *arg)
{ … }
static PyMethodDef semlock_methods[] = …;
static PyMemberDef semlock_members[] = …;
static PyType_Slot _PyMp_SemLockType_slots[] = …;
PyType_Spec _PyMp_SemLockType_spec = …;
PyObject *
_PyMp_sem_unlink(const char *name)
{ … }
#endif