1993-07-28 09:05:47 +00:00
|
|
|
#ifndef Py_CEVAL_H
|
|
|
|
#define Py_CEVAL_H
|
|
|
|
#ifdef __cplusplus
|
|
|
|
extern "C" {
|
|
|
|
#endif
|
|
|
|
|
1991-02-19 12:39:46 +00:00
|
|
|
/***********************************************************
|
1995-01-04 19:06:22 +00:00
|
|
|
Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam,
|
|
|
|
The Netherlands.
|
1991-02-19 12:39:46 +00:00
|
|
|
|
|
|
|
All Rights Reserved
|
|
|
|
|
1996-10-25 14:44:06 +00:00
|
|
|
Permission to use, copy, modify, and distribute this software and its
|
|
|
|
documentation for any purpose and without fee is hereby granted,
|
1991-02-19 12:39:46 +00:00
|
|
|
provided that the above copyright notice appear in all copies and that
|
1996-10-25 14:44:06 +00:00
|
|
|
both that copyright notice and this permission notice appear in
|
1991-02-19 12:39:46 +00:00
|
|
|
supporting documentation, and that the names of Stichting Mathematisch
|
1996-10-25 14:44:06 +00:00
|
|
|
Centrum or CWI or Corporation for National Research Initiatives or
|
|
|
|
CNRI not be used in advertising or publicity pertaining to
|
|
|
|
distribution of the software without specific, written prior
|
|
|
|
permission.
|
|
|
|
|
|
|
|
While CWI is the initial source for this software, a modified version
|
|
|
|
is made available by the Corporation for National Research Initiatives
|
|
|
|
(CNRI) at the Internet address ftp://ftp.python.org.
|
|
|
|
|
|
|
|
STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH
|
|
|
|
REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
|
|
|
|
MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH
|
|
|
|
CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
|
|
|
|
DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
|
|
|
|
PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
|
|
|
|
TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
|
|
|
|
PERFORMANCE OF THIS SOFTWARE.
|
1991-02-19 12:39:46 +00:00
|
|
|
|
|
|
|
******************************************************************/
|
|
|
|
|
1992-08-05 19:58:53 +00:00
|
|
|
/* Interface to random parts in ceval.c */
|
1990-12-20 15:06:42 +00:00
|
|
|
|
1998-12-04 18:48:25 +00:00
|
|
|
DL_IMPORT(PyObject *) PyEval_CallObjectWithKeywords
|
1995-07-18 14:21:06 +00:00
|
|
|
Py_PROTO((PyObject *, PyObject *, PyObject *));
|
1991-07-27 21:33:03 +00:00
|
|
|
|
1997-08-30 15:02:50 +00:00
|
|
|
/* Inline this */
|
|
|
|
#define PyEval_CallObject(func,arg) \
|
|
|
|
PyEval_CallObjectWithKeywords(func, arg, (PyObject *)NULL)
|
|
|
|
|
1998-08-08 20:53:36 +00:00
|
|
|
#ifdef HAVE_STDARG_PROTOTYPES
|
1998-12-04 18:48:25 +00:00
|
|
|
DL_IMPORT(PyObject *) PyEval_CallFunction Py_PROTO((PyObject *obj, char *format, ...));
|
|
|
|
DL_IMPORT(PyObject *) PyEval_CallMethod Py_PROTO((PyObject *obj,
|
1998-08-08 20:53:36 +00:00
|
|
|
char *methodname, char *format, ...));
|
|
|
|
#else
|
|
|
|
/* Better to have no prototypes at all for varargs functions in this case */
|
1998-12-04 18:48:25 +00:00
|
|
|
DL_IMPORT(PyObject *) PyEval_CallFunction();
|
|
|
|
DL_IMPORT(PyObject *) PyEval_CallMethod();
|
1998-08-08 20:53:36 +00:00
|
|
|
#endif
|
|
|
|
|
1998-12-04 18:48:25 +00:00
|
|
|
DL_IMPORT(PyObject *) PyEval_GetBuiltins Py_PROTO((void));
|
|
|
|
DL_IMPORT(PyObject *) PyEval_GetGlobals Py_PROTO((void));
|
|
|
|
DL_IMPORT(PyObject *) PyEval_GetLocals Py_PROTO((void));
|
|
|
|
DL_IMPORT(PyObject *) PyEval_GetOwner Py_PROTO((void));
|
|
|
|
DL_IMPORT(PyObject *) PyEval_GetFrame Py_PROTO((void));
|
|
|
|
DL_IMPORT(int) PyEval_GetRestricted Py_PROTO((void));
|
1990-12-20 15:06:42 +00:00
|
|
|
|
1998-12-04 18:48:25 +00:00
|
|
|
DL_IMPORT(int) Py_FlushLine Py_PROTO((void));
|
1992-08-05 19:58:53 +00:00
|
|
|
|
1998-12-04 18:48:25 +00:00
|
|
|
DL_IMPORT(int) Py_AddPendingCall Py_PROTO((int (*func) Py_PROTO((ANY *)), ANY *arg));
|
|
|
|
DL_IMPORT(int) Py_MakePendingCalls Py_PROTO((void));
|
1994-09-14 13:23:36 +00:00
|
|
|
|
1992-08-05 19:58:53 +00:00
|
|
|
|
|
|
|
/* Interface for threads.
|
|
|
|
|
|
|
|
A module that plans to do a blocking system call (or something else
|
|
|
|
that lasts a long time and doesn't touch Python data) can allow other
|
|
|
|
threads to run as follows:
|
|
|
|
|
|
|
|
...preparations here...
|
1995-01-12 11:45:45 +00:00
|
|
|
Py_BEGIN_ALLOW_THREADS
|
1992-08-05 19:58:53 +00:00
|
|
|
...blocking system call here...
|
1995-01-12 11:45:45 +00:00
|
|
|
Py_END_ALLOW_THREADS
|
1994-12-30 15:33:50 +00:00
|
|
|
...interpret result here...
|
1992-08-05 19:58:53 +00:00
|
|
|
|
1995-01-12 11:45:45 +00:00
|
|
|
The Py_BEGIN_ALLOW_THREADS/Py_END_ALLOW_THREADS pair expands to a
|
|
|
|
{}-surrounded block.
|
1992-08-05 19:58:53 +00:00
|
|
|
To leave the block in the middle (e.g., with return), you must insert
|
|
|
|
a line containing RET_SAVE before the return, e.g.
|
|
|
|
|
|
|
|
if (...premature_exit...) {
|
1995-01-12 11:45:45 +00:00
|
|
|
Py_BLOCK_THREADS
|
|
|
|
PyErr_SetFromErrno(PyExc_IOError);
|
1992-08-05 19:58:53 +00:00
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
An alternative is:
|
|
|
|
|
1995-01-12 11:45:45 +00:00
|
|
|
Py_BLOCK_THREADS
|
1992-08-05 19:58:53 +00:00
|
|
|
if (...premature_exit...) {
|
1995-01-12 11:45:45 +00:00
|
|
|
PyErr_SetFromErrno(PyExc_IOError);
|
1992-08-05 19:58:53 +00:00
|
|
|
return NULL;
|
|
|
|
}
|
1995-01-12 11:45:45 +00:00
|
|
|
Py_UNBLOCK_THREADS
|
1992-08-05 19:58:53 +00:00
|
|
|
|
|
|
|
For convenience, that the value of 'errno' is restored across
|
1995-01-12 11:45:45 +00:00
|
|
|
Py_END_ALLOW_THREADS and RET_SAVE.
|
1992-08-05 19:58:53 +00:00
|
|
|
|
1995-01-12 11:45:45 +00:00
|
|
|
WARNING: NEVER NEST CALLS TO Py_BEGIN_ALLOW_THREADS AND
|
|
|
|
Py_END_ALLOW_THREADS!!!
|
1992-08-05 19:58:53 +00:00
|
|
|
|
1995-01-12 11:45:45 +00:00
|
|
|
The function PyEval_InitThreads() should be called only from
|
1992-08-05 19:58:53 +00:00
|
|
|
initthread() in "threadmodule.c".
|
|
|
|
|
|
|
|
Note that not yet all candidates have been converted to use this
|
|
|
|
mechanism!
|
|
|
|
*/
|
|
|
|
|
1998-12-04 18:48:25 +00:00
|
|
|
extern DL_IMPORT(PyThreadState *) PyEval_SaveThread Py_PROTO((void));
|
|
|
|
extern DL_IMPORT(void) PyEval_RestoreThread Py_PROTO((PyThreadState *));
|
1992-08-05 19:58:53 +00:00
|
|
|
|
1994-08-01 11:34:53 +00:00
|
|
|
#ifdef WITH_THREAD
|
1992-08-05 19:58:53 +00:00
|
|
|
|
1998-12-04 18:48:25 +00:00
|
|
|
extern DL_IMPORT(void) PyEval_InitThreads Py_PROTO((void));
|
|
|
|
extern DL_IMPORT(void) PyEval_AcquireLock Py_PROTO((void));
|
|
|
|
extern DL_IMPORT(void) PyEval_ReleaseLock Py_PROTO((void));
|
|
|
|
extern DL_IMPORT(void) PyEval_AcquireThread Py_PROTO((PyThreadState *tstate));
|
|
|
|
extern DL_IMPORT(void) PyEval_ReleaseThread Py_PROTO((PyThreadState *tstate));
|
1997-07-18 23:56:58 +00:00
|
|
|
|
1995-01-12 11:45:45 +00:00
|
|
|
#define Py_BEGIN_ALLOW_THREADS { \
|
1997-07-18 23:56:58 +00:00
|
|
|
PyThreadState *_save; \
|
1995-01-12 11:45:45 +00:00
|
|
|
_save = PyEval_SaveThread();
|
|
|
|
#define Py_BLOCK_THREADS PyEval_RestoreThread(_save);
|
|
|
|
#define Py_UNBLOCK_THREADS _save = PyEval_SaveThread();
|
|
|
|
#define Py_END_ALLOW_THREADS PyEval_RestoreThread(_save); \
|
1992-08-05 19:58:53 +00:00
|
|
|
}
|
|
|
|
|
1994-08-01 11:34:53 +00:00
|
|
|
#else /* !WITH_THREAD */
|
1992-08-05 19:58:53 +00:00
|
|
|
|
1995-01-12 11:45:45 +00:00
|
|
|
#define Py_BEGIN_ALLOW_THREADS {
|
|
|
|
#define Py_BLOCK_THREADS
|
|
|
|
#define Py_UNBLOCK_THREADS
|
|
|
|
#define Py_END_ALLOW_THREADS }
|
1992-08-05 19:58:53 +00:00
|
|
|
|
1994-08-01 11:34:53 +00:00
|
|
|
#endif /* !WITH_THREAD */
|
1993-07-28 09:05:47 +00:00
|
|
|
|
|
|
|
#ifdef __cplusplus
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
#endif /* !Py_CEVAL_H */
|