Quickly renamed.
This commit is contained in:
parent
04e30c188a
commit
65bf9f265e
|
@ -44,140 +44,137 @@ Data members:
|
|||
- ps1, ps2: optional primary and secondary prompts (strings)
|
||||
*/
|
||||
|
||||
#include "allobjects.h"
|
||||
#include "Python.h"
|
||||
|
||||
#include "sysmodule.h"
|
||||
#include "import.h"
|
||||
#include "modsupport.h"
|
||||
#include "osdefs.h"
|
||||
|
||||
object *sys_trace, *sys_profile;
|
||||
int sys_checkinterval = 10;
|
||||
PyObject *_PySys_TraceFunc, *_PySys_ProfileFunc;
|
||||
int _PySys_CheckInterval = 10;
|
||||
|
||||
#if HAVE_UNISTD_H
|
||||
#include <unistd.h>
|
||||
#endif
|
||||
|
||||
static object *sysdict;
|
||||
static PyObject *sysdict;
|
||||
|
||||
#ifdef MS_COREDLL
|
||||
extern void *PyWin_DLLhModule;
|
||||
#endif
|
||||
|
||||
object *
|
||||
sysget(name)
|
||||
PyObject *
|
||||
PySys_GetObject(name)
|
||||
char *name;
|
||||
{
|
||||
return dictlookup(sysdict, name);
|
||||
return PyDict_GetItemString(sysdict, name);
|
||||
}
|
||||
|
||||
FILE *
|
||||
sysgetfile(name, def)
|
||||
PySys_GetFile(name, def)
|
||||
char *name;
|
||||
FILE *def;
|
||||
{
|
||||
FILE *fp = NULL;
|
||||
object *v = sysget(name);
|
||||
if (v != NULL && is_fileobject(v))
|
||||
fp = getfilefile(v);
|
||||
PyObject *v = PySys_GetObject(name);
|
||||
if (v != NULL && PyFile_Check(v))
|
||||
fp = PyFile_AsFile(v);
|
||||
if (fp == NULL)
|
||||
fp = def;
|
||||
return fp;
|
||||
}
|
||||
|
||||
int
|
||||
sysset(name, v)
|
||||
PySys_SetObject(name, v)
|
||||
char *name;
|
||||
object *v;
|
||||
PyObject *v;
|
||||
{
|
||||
if (v == NULL) {
|
||||
if (dictlookup(sysdict, name) == NULL)
|
||||
if (PyDict_GetItemString(sysdict, name) == NULL)
|
||||
return 0;
|
||||
else
|
||||
return dictremove(sysdict, name);
|
||||
return PyDict_DelItemString(sysdict, name);
|
||||
}
|
||||
else
|
||||
return dictinsert(sysdict, name, v);
|
||||
return PyDict_SetItemString(sysdict, name, v);
|
||||
}
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
sys_exit(self, args)
|
||||
object *self;
|
||||
object *args;
|
||||
PyObject *self;
|
||||
PyObject *args;
|
||||
{
|
||||
/* Raise SystemExit so callers may catch it or clean up. */
|
||||
err_setval(SystemExit, args);
|
||||
PyErr_SetObject(PyExc_SystemExit, args);
|
||||
return NULL;
|
||||
}
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
sys_settrace(self, args)
|
||||
object *self;
|
||||
object *args;
|
||||
PyObject *self;
|
||||
PyObject *args;
|
||||
{
|
||||
if (args == None)
|
||||
if (args == Py_None)
|
||||
args = NULL;
|
||||
else
|
||||
XINCREF(args);
|
||||
XDECREF(sys_trace);
|
||||
sys_trace = args;
|
||||
INCREF(None);
|
||||
return None;
|
||||
Py_XINCREF(args);
|
||||
Py_XDECREF(_PySys_TraceFunc);
|
||||
_PySys_TraceFunc = args;
|
||||
Py_INCREF(Py_None);
|
||||
return Py_None;
|
||||
}
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
sys_setprofile(self, args)
|
||||
object *self;
|
||||
object *args;
|
||||
PyObject *self;
|
||||
PyObject *args;
|
||||
{
|
||||
if (args == None)
|
||||
if (args == Py_None)
|
||||
args = NULL;
|
||||
else
|
||||
XINCREF(args);
|
||||
XDECREF(sys_profile);
|
||||
sys_profile = args;
|
||||
INCREF(None);
|
||||
return None;
|
||||
Py_XINCREF(args);
|
||||
Py_XDECREF(_PySys_ProfileFunc);
|
||||
_PySys_ProfileFunc = args;
|
||||
Py_INCREF(Py_None);
|
||||
return Py_None;
|
||||
}
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
sys_setcheckinterval(self, args)
|
||||
object *self;
|
||||
object *args;
|
||||
PyObject *self;
|
||||
PyObject *args;
|
||||
{
|
||||
if (!newgetargs(args, "i", &sys_checkinterval))
|
||||
if (!PyArg_ParseTuple(args, "i", &_PySys_CheckInterval))
|
||||
return NULL;
|
||||
INCREF(None);
|
||||
return None;
|
||||
Py_INCREF(Py_None);
|
||||
return Py_None;
|
||||
}
|
||||
|
||||
#ifdef USE_MALLOPT
|
||||
/* Link with -lmalloc (or -lmpc) on an SGI */
|
||||
#include <malloc.h>
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
sys_mdebug(self, args)
|
||||
object *self;
|
||||
object *args;
|
||||
PyObject *self;
|
||||
PyObject *args;
|
||||
{
|
||||
int flag;
|
||||
if (!getargs(args, "i", &flag))
|
||||
if (!PyArg_Parse(args, "i", &flag))
|
||||
return NULL;
|
||||
mallopt(M_DEBUG, flag);
|
||||
INCREF(None);
|
||||
return None;
|
||||
Py_INCREF(Py_None);
|
||||
return Py_None;
|
||||
}
|
||||
#endif /* USE_MALLOPT */
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
sys_getrefcount(self, args)
|
||||
object *self;
|
||||
object *args;
|
||||
PyObject *self;
|
||||
PyObject *args;
|
||||
{
|
||||
object *arg;
|
||||
if (!getargs(args, "O", &arg))
|
||||
PyObject *arg;
|
||||
if (!PyArg_Parse(args, "O", &arg))
|
||||
return NULL;
|
||||
return newintobject((long) arg->ob_refcnt);
|
||||
return PyInt_FromLong((long) arg->ob_refcnt);
|
||||
}
|
||||
|
||||
#ifdef COUNT_ALLOCS
|
||||
|
@ -203,7 +200,7 @@ extern PyObject *_Py_GetObjects Py_PROTO((PyObject *, PyObject *));
|
|||
extern PyObject *_Py_GetDXProfile Py_PROTO((PyObject *, PyObject *));
|
||||
#endif
|
||||
|
||||
static struct methodlist sys_methods[] = {
|
||||
static PyMethodDef sys_methods[] = {
|
||||
/* Might as well keep this in alphabetic order */
|
||||
{"exit", sys_exit, 0},
|
||||
#ifdef COUNT_ALLOCS
|
||||
|
@ -225,93 +222,100 @@ static struct methodlist sys_methods[] = {
|
|||
{NULL, NULL} /* sentinel */
|
||||
};
|
||||
|
||||
static object *sysin, *sysout, *syserr;
|
||||
static PyObject *sysin, *sysout, *syserr;
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
list_builtin_module_names()
|
||||
{
|
||||
object *list = newlistobject(0);
|
||||
PyObject *list = PyList_New(0);
|
||||
int i;
|
||||
if (list == NULL)
|
||||
return NULL;
|
||||
for (i = 0; inittab[i].name != NULL; i++) {
|
||||
object *name = newstringobject(inittab[i].name);
|
||||
PyObject *name = PyString_FromString(inittab[i].name);
|
||||
if (name == NULL)
|
||||
break;
|
||||
addlistitem(list, name);
|
||||
DECREF(name);
|
||||
PyList_Append(list, name);
|
||||
Py_DECREF(name);
|
||||
}
|
||||
if (sortlist(list) != 0) {
|
||||
DECREF(list);
|
||||
if (PyList_Sort(list) != 0) {
|
||||
Py_DECREF(list);
|
||||
list = NULL;
|
||||
}
|
||||
if (list) {
|
||||
object *v = listtuple(list);
|
||||
DECREF(list);
|
||||
PyObject *v = PyList_AsTuple(list);
|
||||
Py_DECREF(list);
|
||||
list = v;
|
||||
}
|
||||
return list;
|
||||
}
|
||||
|
||||
void
|
||||
initsys()
|
||||
PySys_Init()
|
||||
{
|
||||
extern long getmaxint PROTO((void));
|
||||
extern char *getversion PROTO((void));
|
||||
extern char *getcopyright PROTO((void));
|
||||
extern char *getplatform PROTO((void));
|
||||
extern char *Py_GetPrefix PROTO((void));
|
||||
extern char *Py_GetExecPrefix PROTO((void));
|
||||
extern int fclose PROTO((FILE *));
|
||||
object *m = initmodule("sys", sys_methods);
|
||||
object *v;
|
||||
sysdict = getmoduledict(m);
|
||||
INCREF(sysdict);
|
||||
extern long PyInt_GetMax Py_PROTO((void));
|
||||
extern char *Py_GetVersion Py_PROTO((void));
|
||||
extern char *Py_GetCopyright Py_PROTO((void));
|
||||
extern char *Py_GetPlatform Py_PROTO((void));
|
||||
extern char *Py_GetPrefix Py_PROTO((void));
|
||||
extern char *Py_GetExecPrefix Py_PROTO((void));
|
||||
extern int fclose Py_PROTO((FILE *));
|
||||
PyObject *m = Py_InitModule("sys", sys_methods);
|
||||
PyObject *v;
|
||||
sysdict = PyModule_GetDict(m);
|
||||
Py_INCREF(sysdict);
|
||||
/* NB keep an extra ref to the std files to avoid closing them
|
||||
when the user deletes them */
|
||||
sysin = newopenfileobject(stdin, "<stdin>", "r", fclose);
|
||||
sysout = newopenfileobject(stdout, "<stdout>", "w", fclose);
|
||||
syserr = newopenfileobject(stderr, "<stderr>", "w", fclose);
|
||||
if (err_occurred())
|
||||
fatal("can't initialize sys.std{in,out,err}");
|
||||
dictinsert(sysdict, "stdin", sysin);
|
||||
dictinsert(sysdict, "stdout", sysout);
|
||||
dictinsert(sysdict, "stderr", syserr);
|
||||
dictinsert(sysdict, "version", v = newstringobject(getversion()));
|
||||
XDECREF(v);
|
||||
dictinsert(sysdict, "copyright", v = newstringobject(getcopyright()));
|
||||
XDECREF(v);
|
||||
dictinsert(sysdict, "platform", v = newstringobject(getplatform()));
|
||||
XDECREF(v);
|
||||
dictinsert(sysdict, "prefix", v = newstringobject(Py_GetPrefix()));
|
||||
XDECREF(v);
|
||||
dictinsert(sysdict, "exec_prefix",
|
||||
v = newstringobject(Py_GetExecPrefix()));
|
||||
XDECREF(v);
|
||||
dictinsert(sysdict, "maxint", v = newintobject(getmaxint()));
|
||||
XDECREF(v);
|
||||
dictinsert(sysdict, "modules", get_modules());
|
||||
dictinsert(sysdict, "builtin_module_names",
|
||||
sysin = PyFile_FromFile(stdin, "<stdin>", "r", fclose);
|
||||
sysout = PyFile_FromFile(stdout, "<stdout>", "w", fclose);
|
||||
syserr = PyFile_FromFile(stderr, "<stderr>", "w", fclose);
|
||||
if (PyErr_Occurred())
|
||||
Py_FatalError("can't initialize sys.std{in,out,err}");
|
||||
PyDict_SetItemString(sysdict, "stdin", sysin);
|
||||
PyDict_SetItemString(sysdict, "stdout", sysout);
|
||||
PyDict_SetItemString(sysdict, "stderr", syserr);
|
||||
PyDict_SetItemString(sysdict, "version",
|
||||
v = PyString_FromString(Py_GetVersion()));
|
||||
Py_XDECREF(v);
|
||||
PyDict_SetItemString(sysdict, "copyright",
|
||||
v = PyString_FromString(Py_GetCopyright()));
|
||||
Py_XDECREF(v);
|
||||
PyDict_SetItemString(sysdict, "platform",
|
||||
v = PyString_FromString(Py_GetPlatform()));
|
||||
Py_XDECREF(v);
|
||||
PyDict_SetItemString(sysdict, "prefix",
|
||||
v = PyString_FromString(Py_GetPrefix()));
|
||||
Py_XDECREF(v);
|
||||
PyDict_SetItemString(sysdict, "exec_prefix",
|
||||
v = PyString_FromString(Py_GetExecPrefix()));
|
||||
Py_XDECREF(v);
|
||||
PyDict_SetItemString(sysdict, "maxint",
|
||||
v = PyInt_FromLong(PyInt_GetMax()));
|
||||
Py_XDECREF(v);
|
||||
PyDict_SetItemString(sysdict, "modules", PyImport_GetModuleDict());
|
||||
PyDict_SetItemString(sysdict, "builtin_module_names",
|
||||
v = list_builtin_module_names());
|
||||
XDECREF(v);
|
||||
Py_XDECREF(v);
|
||||
#ifdef MS_COREDLL
|
||||
dictinsert(sysdict, "dllhandle", v = newintobject((int)PyWin_DLLhModule));
|
||||
XDECREF(v);
|
||||
dictinsert(sysdict, "winver", v = newstringobject(MS_DLL_ID));
|
||||
XDECREF(v);
|
||||
PyDict_SetItemString(sysdict, "dllhandle",
|
||||
v = PyInt_FromLong((int)PyWin_DLLhModule));
|
||||
Py_XDECREF(v);
|
||||
PyDict_SetItemString(sysdict, "winver",
|
||||
v = PyString_FromString(MS_DLL_ID));
|
||||
Py_XDECREF(v);
|
||||
#endif
|
||||
if (err_occurred())
|
||||
fatal("can't insert sys.* objects in sys dict");
|
||||
if (PyErr_Occurred())
|
||||
Py_FatalError("can't insert sys.* objects in sys dict");
|
||||
}
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
makepathobject(path, delim)
|
||||
char *path;
|
||||
int delim;
|
||||
{
|
||||
int i, n;
|
||||
char *p;
|
||||
object *v, *w;
|
||||
PyObject *v, *w;
|
||||
|
||||
n = 1;
|
||||
p = path;
|
||||
|
@ -319,19 +323,19 @@ makepathobject(path, delim)
|
|||
n++;
|
||||
p++;
|
||||
}
|
||||
v = newlistobject(n);
|
||||
v = PyList_New(n);
|
||||
if (v == NULL)
|
||||
return NULL;
|
||||
for (i = 0; ; i++) {
|
||||
p = strchr(path, delim);
|
||||
if (p == NULL)
|
||||
p = strchr(path, '\0'); /* End of string */
|
||||
w = newsizedstringobject(path, (int) (p - path));
|
||||
w = PyString_FromStringAndSize(path, (int) (p - path));
|
||||
if (w == NULL) {
|
||||
DECREF(v);
|
||||
Py_DECREF(v);
|
||||
return NULL;
|
||||
}
|
||||
setlistitem(v, i, w);
|
||||
PyList_SetItem(v, i, w);
|
||||
if (*p == '\0')
|
||||
break;
|
||||
path = p+1;
|
||||
|
@ -340,61 +344,61 @@ makepathobject(path, delim)
|
|||
}
|
||||
|
||||
void
|
||||
setpythonpath(path)
|
||||
PySys_SetPath(path)
|
||||
char *path;
|
||||
{
|
||||
object *v;
|
||||
PyObject *v;
|
||||
if ((v = makepathobject(path, DELIM)) == NULL)
|
||||
fatal("can't create sys.path");
|
||||
if (sysset("path", v) != 0)
|
||||
fatal("can't assign sys.path");
|
||||
DECREF(v);
|
||||
Py_FatalError("can't create sys.path");
|
||||
if (PySys_SetObject("path", v) != 0)
|
||||
Py_FatalError("can't assign sys.path");
|
||||
Py_DECREF(v);
|
||||
}
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
makeargvobject(argc, argv)
|
||||
int argc;
|
||||
char **argv;
|
||||
{
|
||||
object *av;
|
||||
PyObject *av;
|
||||
if (argc <= 0 || argv == NULL) {
|
||||
/* Ensure at least one (empty) argument is seen */
|
||||
static char *empty_argv[1] = {""};
|
||||
argv = empty_argv;
|
||||
argc = 1;
|
||||
}
|
||||
av = newlistobject(argc);
|
||||
av = PyList_New(argc);
|
||||
if (av != NULL) {
|
||||
int i;
|
||||
for (i = 0; i < argc; i++) {
|
||||
object *v = newstringobject(argv[i]);
|
||||
PyObject *v = PyString_FromString(argv[i]);
|
||||
if (v == NULL) {
|
||||
DECREF(av);
|
||||
Py_DECREF(av);
|
||||
av = NULL;
|
||||
break;
|
||||
}
|
||||
setlistitem(av, i, v);
|
||||
PyList_SetItem(av, i, v);
|
||||
}
|
||||
}
|
||||
return av;
|
||||
}
|
||||
|
||||
void
|
||||
setpythonargv(argc, argv)
|
||||
PySys_SetArgv(argc, argv)
|
||||
int argc;
|
||||
char **argv;
|
||||
{
|
||||
object *av = makeargvobject(argc, argv);
|
||||
object *path = sysget("path");
|
||||
PyObject *av = makeargvobject(argc, argv);
|
||||
PyObject *path = PySys_GetObject("path");
|
||||
if (av == NULL)
|
||||
fatal("no mem for sys.argv");
|
||||
if (sysset("argv", av) != 0)
|
||||
fatal("can't assign sys.argv");
|
||||
Py_FatalError("no mem for sys.argv");
|
||||
if (PySys_SetObject("argv", av) != 0)
|
||||
Py_FatalError("can't assign sys.argv");
|
||||
if (path != NULL) {
|
||||
char *argv0 = argv[0];
|
||||
char *p = NULL;
|
||||
int n = 0;
|
||||
object *a;
|
||||
PyObject *a;
|
||||
#ifdef HAVE_READLINK
|
||||
char link[MAXPATHLEN+1];
|
||||
char argv0copy[2*MAXPATHLEN+1];
|
||||
|
@ -448,12 +452,12 @@ setpythonargv(argc, argv)
|
|||
#endif /* Unix */
|
||||
}
|
||||
#endif /* All others */
|
||||
a = newsizedstringobject(argv0, n);
|
||||
a = PyString_FromStringAndSize(argv0, n);
|
||||
if (a == NULL)
|
||||
fatal("no mem for sys.path insertion");
|
||||
if (inslistitem(path, 0, a) < 0)
|
||||
fatal("sys.path.insert(0) failed");
|
||||
DECREF(a);
|
||||
Py_FatalError("no mem for sys.path insertion");
|
||||
if (PyList_Insert(path, 0, a) < 0)
|
||||
Py_FatalError("sys.path.insert(0) failed");
|
||||
Py_DECREF(a);
|
||||
}
|
||||
DECREF(av);
|
||||
Py_DECREF(av);
|
||||
}
|
||||
|
|
|
@ -31,19 +31,17 @@ PERFORMANCE OF THIS SOFTWARE.
|
|||
|
||||
/* Traceback implementation */
|
||||
|
||||
#include "allobjects.h"
|
||||
#include "Python.h"
|
||||
|
||||
#include "sysmodule.h"
|
||||
#include "compile.h"
|
||||
#include "frameobject.h"
|
||||
#include "traceback.h"
|
||||
#include "structmember.h"
|
||||
#include "osdefs.h"
|
||||
|
||||
typedef struct _tracebackobject {
|
||||
OB_HEAD
|
||||
PyObject_HEAD
|
||||
struct _tracebackobject *tb_next;
|
||||
frameobject *tb_frame;
|
||||
PyFrameObject *tb_frame;
|
||||
int tb_lasti;
|
||||
int tb_lineno;
|
||||
} tracebackobject;
|
||||
|
@ -58,28 +56,28 @@ static struct memberlist tb_memberlist[] = {
|
|||
{NULL} /* Sentinel */
|
||||
};
|
||||
|
||||
static object *
|
||||
static PyObject *
|
||||
tb_getattr(tb, name)
|
||||
tracebackobject *tb;
|
||||
char *name;
|
||||
{
|
||||
return getmember((char *)tb, tb_memberlist, name);
|
||||
return PyMember_Get((char *)tb, tb_memberlist, name);
|
||||
}
|
||||
|
||||
static void
|
||||
tb_dealloc(tb)
|
||||
tracebackobject *tb;
|
||||
{
|
||||
XDECREF(tb->tb_next);
|
||||
XDECREF(tb->tb_frame);
|
||||
DEL(tb);
|
||||
Py_XDECREF(tb->tb_next);
|
||||
Py_XDECREF(tb->tb_frame);
|
||||
PyMem_DEL(tb);
|
||||
}
|
||||
|
||||
#define Tracebacktype PyTraceBack_Type
|
||||
#define is_tracebackobject PyTraceBack_Check
|
||||
|
||||
typeobject Tracebacktype = {
|
||||
OB_HEAD_INIT(&Typetype)
|
||||
PyTypeObject Tracebacktype = {
|
||||
PyObject_HEAD_INIT(&PyType_Type)
|
||||
0,
|
||||
"traceback",
|
||||
sizeof(tracebackobject),
|
||||
|
@ -98,20 +96,20 @@ typeobject Tracebacktype = {
|
|||
static tracebackobject *
|
||||
newtracebackobject(next, frame, lasti, lineno)
|
||||
tracebackobject *next;
|
||||
frameobject *frame;
|
||||
PyFrameObject *frame;
|
||||
int lasti, lineno;
|
||||
{
|
||||
tracebackobject *tb;
|
||||
if ((next != NULL && !is_tracebackobject(next)) ||
|
||||
frame == NULL || !is_frameobject(frame)) {
|
||||
err_badcall();
|
||||
frame == NULL || !PyFrame_Check(frame)) {
|
||||
PyErr_BadInternalCall();
|
||||
return NULL;
|
||||
}
|
||||
tb = NEWOBJ(tracebackobject, &Tracebacktype);
|
||||
tb = PyObject_NEW(tracebackobject, &Tracebacktype);
|
||||
if (tb != NULL) {
|
||||
XINCREF(next);
|
||||
Py_XINCREF(next);
|
||||
tb->tb_next = next;
|
||||
XINCREF(frame);
|
||||
Py_XINCREF(frame);
|
||||
tb->tb_frame = frame;
|
||||
tb->tb_lasti = lasti;
|
||||
tb->tb_lineno = lineno;
|
||||
|
@ -122,44 +120,45 @@ newtracebackobject(next, frame, lasti, lineno)
|
|||
static tracebackobject *tb_current = NULL;
|
||||
|
||||
int
|
||||
tb_here(frame)
|
||||
frameobject *frame;
|
||||
PyTraceBack_Here(frame)
|
||||
PyFrameObject *frame;
|
||||
{
|
||||
tracebackobject *tb;
|
||||
tb = newtracebackobject(tb_current, frame, frame->f_lasti, frame->f_lineno);
|
||||
tb = newtracebackobject(tb_current, frame,
|
||||
frame->f_lasti, frame->f_lineno);
|
||||
if (tb == NULL)
|
||||
return -1;
|
||||
XDECREF(tb_current);
|
||||
Py_XDECREF(tb_current);
|
||||
tb_current = tb;
|
||||
return 0;
|
||||
}
|
||||
|
||||
object *
|
||||
tb_fetch()
|
||||
PyObject *
|
||||
PyTraceBack_Fetch()
|
||||
{
|
||||
object *v;
|
||||
v = (object *)tb_current;
|
||||
PyObject *v;
|
||||
v = (PyObject *)tb_current;
|
||||
tb_current = NULL;
|
||||
return v;
|
||||
}
|
||||
|
||||
int
|
||||
tb_store(v)
|
||||
object *v;
|
||||
PyTraceBack_Store(v)
|
||||
PyObject *v;
|
||||
{
|
||||
if (v != NULL && !is_tracebackobject(v)) {
|
||||
err_badcall();
|
||||
PyErr_BadInternalCall();
|
||||
return -1;
|
||||
}
|
||||
XDECREF(tb_current);
|
||||
XINCREF(v);
|
||||
Py_XDECREF(tb_current);
|
||||
Py_XINCREF(v);
|
||||
tb_current = (tracebackobject *)v;
|
||||
return 0;
|
||||
}
|
||||
|
||||
static void
|
||||
tb_displayline(f, filename, lineno, name)
|
||||
object *f;
|
||||
PyObject *f;
|
||||
char *filename;
|
||||
int lineno;
|
||||
char *name;
|
||||
|
@ -177,25 +176,25 @@ tb_displayline(f, filename, lineno, name)
|
|||
xfp = fopen(filename, "r");
|
||||
if (xfp == NULL) {
|
||||
/* Search tail of filename in sys.path before giving up */
|
||||
object *path;
|
||||
PyObject *path;
|
||||
char *tail = strrchr(filename, SEP);
|
||||
if (tail == NULL)
|
||||
tail = filename;
|
||||
else
|
||||
tail++;
|
||||
path = sysget("path");
|
||||
if (path != NULL && is_listobject(path)) {
|
||||
int npath = getlistsize(path);
|
||||
path = PySys_GetObject("path");
|
||||
if (path != NULL && PyList_Check(path)) {
|
||||
int npath = PyList_Size(path);
|
||||
int taillen = strlen(tail);
|
||||
char namebuf[MAXPATHLEN+1];
|
||||
for (i = 0; i < npath; i++) {
|
||||
object *v = getlistitem(path, i);
|
||||
if (is_stringobject(v)) {
|
||||
PyObject *v = PyList_GetItem(path, i);
|
||||
if (PyString_Check(v)) {
|
||||
int len;
|
||||
len = getstringsize(v);
|
||||
len = PyString_Size(v);
|
||||
if (len + 1 + taillen >= MAXPATHLEN)
|
||||
continue; /* Too long */
|
||||
strcpy(namebuf, getstringvalue(v));
|
||||
strcpy(namebuf, PyString_AsString(v));
|
||||
if ((int)strlen(namebuf) != len)
|
||||
continue; /* v contains '\0' */
|
||||
if (len > 0 && namebuf[len-1] != SEP)
|
||||
|
@ -211,7 +210,7 @@ tb_displayline(f, filename, lineno, name)
|
|||
}
|
||||
}
|
||||
sprintf(linebuf, FMT, filename, lineno, name);
|
||||
writestring(linebuf, f);
|
||||
PyFile_WriteString(linebuf, f);
|
||||
if (xfp == NULL)
|
||||
return;
|
||||
for (i = 0; i < lineno; i++) {
|
||||
|
@ -222,10 +221,10 @@ tb_displayline(f, filename, lineno, name)
|
|||
char *p = linebuf;
|
||||
while (*p == ' ' || *p == '\t' || *p == '\014')
|
||||
p++;
|
||||
writestring(" ", f);
|
||||
writestring(p, f);
|
||||
PyFile_WriteString(" ", f);
|
||||
PyFile_WriteString(p, f);
|
||||
if (strchr(p, '\n') == NULL)
|
||||
writestring("\n", f);
|
||||
PyFile_WriteString("\n", f);
|
||||
}
|
||||
fclose(xfp);
|
||||
}
|
||||
|
@ -233,7 +232,7 @@ tb_displayline(f, filename, lineno, name)
|
|||
static void
|
||||
tb_printinternal(tb, f, limit)
|
||||
tracebackobject *tb;
|
||||
object *f;
|
||||
PyObject *f;
|
||||
int limit;
|
||||
{
|
||||
int depth = 0;
|
||||
|
@ -242,14 +241,15 @@ tb_printinternal(tb, f, limit)
|
|||
depth++;
|
||||
tb1 = tb1->tb_next;
|
||||
}
|
||||
while (tb != NULL && !intrcheck()) {
|
||||
while (tb != NULL && !PyOS_InterruptOccurred()) {
|
||||
if (depth <= limit) {
|
||||
tb->tb_lineno = PyCode_Addr2Line(tb->tb_frame->f_code,
|
||||
tb->tb_lasti);
|
||||
tb_displayline(f,
|
||||
getstringvalue(tb->tb_frame->f_code->co_filename),
|
||||
PyString_AsString(
|
||||
tb->tb_frame->f_code->co_filename),
|
||||
tb->tb_lineno,
|
||||
getstringvalue(tb->tb_frame->f_code->co_name));
|
||||
PyString_AsString(tb->tb_frame->f_code->co_name));
|
||||
}
|
||||
depth--;
|
||||
tb = tb->tb_next;
|
||||
|
@ -257,25 +257,25 @@ tb_printinternal(tb, f, limit)
|
|||
}
|
||||
|
||||
int
|
||||
tb_print(v, f)
|
||||
object *v;
|
||||
object *f;
|
||||
PyTraceBack_Print(v, f)
|
||||
PyObject *v;
|
||||
PyObject *f;
|
||||
{
|
||||
object *limitv;
|
||||
PyObject *limitv;
|
||||
int limit = 1000;
|
||||
if (v == NULL)
|
||||
return 0;
|
||||
if (!is_tracebackobject(v)) {
|
||||
err_badcall();
|
||||
PyErr_BadInternalCall();
|
||||
return -1;
|
||||
}
|
||||
limitv = sysget("tracebacklimit");
|
||||
if (limitv && is_intobject(limitv)) {
|
||||
limit = getintvalue(limitv);
|
||||
limitv = PySys_GetObject("tracebacklimit");
|
||||
if (limitv && PyInt_Check(limitv)) {
|
||||
limit = PyInt_AsLong(limitv);
|
||||
if (limit <= 0)
|
||||
return 0;
|
||||
}
|
||||
writestring("Traceback (innermost last):\n", f);
|
||||
PyFile_WriteString("Traceback (innermost last):\n", f);
|
||||
tb_printinternal((tracebackobject *)v, f, limit);
|
||||
return 0;
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue