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
|
|
|
/***********************************************************
|
2000-06-30 23:50:40 +00:00
|
|
|
Copyright (c) 2000, BeOpen.com.
|
|
|
|
Copyright (c) 1995-2000, Corporation for National Research Initiatives.
|
|
|
|
Copyright (c) 1990-1995, Stichting Mathematisch Centrum.
|
|
|
|
All rights reserved.
|
|
|
|
|
|
|
|
See the file "Misc/COPYRIGHT" for information on usage and
|
|
|
|
redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
|
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
|
2000-07-08 23:37:28 +00:00
|
|
|
(PyObject *, PyObject *, PyObject *);
|
1991-07-27 21:33:03 +00:00
|
|
|
|
1999-03-17 18:44:39 +00:00
|
|
|
/* DLL-level Backwards compatibility: */
|
|
|
|
#undef PyEval_CallObject
|
2000-07-08 23:37:28 +00:00
|
|
|
DL_IMPORT(PyObject *) PyEval_CallObject(PyObject *, PyObject *);
|
1999-03-17 18:44:39 +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
|
2000-07-08 23:37:28 +00:00
|
|
|
DL_IMPORT(PyObject *) PyEval_CallFunction(PyObject *obj, char *format, ...);
|
|
|
|
DL_IMPORT(PyObject *) PyEval_CallMethod(PyObject *obj,
|
|
|
|
char *methodname, char *format, ...);
|
1998-08-08 20:53:36 +00:00
|
|
|
#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
|
|
|
|
|
2000-07-08 23:37:28 +00:00
|
|
|
DL_IMPORT(PyObject *) PyEval_GetBuiltins(void);
|
|
|
|
DL_IMPORT(PyObject *) PyEval_GetGlobals(void);
|
|
|
|
DL_IMPORT(PyObject *) PyEval_GetLocals(void);
|
|
|
|
DL_IMPORT(PyObject *) PyEval_GetOwner(void);
|
|
|
|
DL_IMPORT(PyObject *) PyEval_GetFrame(void);
|
|
|
|
DL_IMPORT(int) PyEval_GetRestricted(void);
|
1990-12-20 15:06:42 +00:00
|
|
|
|
2000-07-08 23:37:28 +00:00
|
|
|
DL_IMPORT(int) Py_FlushLine(void);
|
1992-08-05 19:58:53 +00:00
|
|
|
|
2000-07-08 23:37:28 +00:00
|
|
|
DL_IMPORT(int) Py_AddPendingCall(int (*func)(ANY *), ANY *arg);
|
|
|
|
DL_IMPORT(int) Py_MakePendingCalls(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!
|
|
|
|
*/
|
|
|
|
|
2000-07-08 23:37:28 +00:00
|
|
|
extern DL_IMPORT(PyThreadState *) PyEval_SaveThread(void);
|
|
|
|
extern DL_IMPORT(void) PyEval_RestoreThread(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
|
|
|
|
2000-07-08 23:37:28 +00:00
|
|
|
extern DL_IMPORT(void) PyEval_InitThreads(void);
|
|
|
|
extern DL_IMPORT(void) PyEval_AcquireLock(void);
|
|
|
|
extern DL_IMPORT(void) PyEval_ReleaseLock(void);
|
|
|
|
extern DL_IMPORT(void) PyEval_AcquireThread(PyThreadState *tstate);
|
|
|
|
extern DL_IMPORT(void) PyEval_ReleaseThread(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
|
|
|
|
2000-07-08 23:37:28 +00:00
|
|
|
extern DL_IMPORT(int) _PyEval_SliceIndex(PyObject *, int *);
|
2000-05-08 14:04:54 +00:00
|
|
|
|
|
|
|
|
1993-07-28 09:05:47 +00:00
|
|
|
#ifdef __cplusplus
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
#endif /* !Py_CEVAL_H */
|