Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 1 | /*********************************************************** |
Guido van Rossum | 6610ad9 | 1995-01-04 19:07:38 +0000 | [diff] [blame] | 2 | Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, |
| 3 | The Netherlands. |
Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 4 | |
| 5 | All Rights Reserved |
| 6 | |
Guido van Rossum | fd71b9e | 2000-06-30 23:50:40 +0000 | [diff] [blame^] | 7 | Copyright (c) 2000, BeOpen.com. |
| 8 | Copyright (c) 1995-2000, Corporation for National Research Initiatives. |
| 9 | Copyright (c) 1990-1995, Stichting Mathematisch Centrum. |
| 10 | All rights reserved. |
Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 11 | |
Guido van Rossum | fd71b9e | 2000-06-30 23:50:40 +0000 | [diff] [blame^] | 12 | See the file "Misc/COPYRIGHT" for information on usage and |
| 13 | redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES. |
Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 14 | |
| 15 | ******************************************************************/ |
| 16 | |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 17 | /* Frame object implementation */ |
| 18 | |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 19 | #include "Python.h" |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 20 | |
| 21 | #include "compile.h" |
| 22 | #include "frameobject.h" |
| 23 | #include "opcode.h" |
| 24 | #include "structmember.h" |
| 25 | |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 26 | #define OFF(x) offsetof(PyFrameObject, x) |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 27 | |
| 28 | static struct memberlist frame_memberlist[] = { |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 29 | {"f_back", T_OBJECT, OFF(f_back), RO}, |
| 30 | {"f_code", T_OBJECT, OFF(f_code), RO}, |
Guido van Rossum | c113482 | 1995-01-10 10:39:16 +0000 | [diff] [blame] | 31 | {"f_builtins", T_OBJECT, OFF(f_builtins),RO}, |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 32 | {"f_globals", T_OBJECT, OFF(f_globals), RO}, |
| 33 | {"f_locals", T_OBJECT, OFF(f_locals), RO}, |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 34 | {"f_lasti", T_INT, OFF(f_lasti), RO}, |
| 35 | {"f_lineno", T_INT, OFF(f_lineno), RO}, |
Guido van Rossum | c113482 | 1995-01-10 10:39:16 +0000 | [diff] [blame] | 36 | {"f_restricted",T_INT, OFF(f_restricted),RO}, |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 37 | {"f_trace", T_OBJECT, OFF(f_trace)}, |
Guido van Rossum | a027efa | 1997-05-05 20:56:21 +0000 | [diff] [blame] | 38 | {"f_exc_type", T_OBJECT, OFF(f_exc_type)}, |
| 39 | {"f_exc_value", T_OBJECT, OFF(f_exc_value)}, |
| 40 | {"f_exc_traceback", T_OBJECT, OFF(f_exc_traceback)}, |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 41 | {NULL} /* Sentinel */ |
| 42 | }; |
| 43 | |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 44 | static PyObject * |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 45 | frame_getattr(f, name) |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 46 | PyFrameObject *f; |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 47 | char *name; |
| 48 | { |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 49 | if (strcmp(name, "f_locals") == 0) |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 50 | PyFrame_FastToLocals(f); |
| 51 | return PyMember_Get((char *)f, frame_memberlist, name); |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 52 | } |
| 53 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 54 | static int |
| 55 | frame_setattr(f, name, value) |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 56 | PyFrameObject *f; |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 57 | char *name; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 58 | PyObject *value; |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 59 | { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 60 | return PyMember_Set((char *)f, frame_memberlist, name, value); |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 61 | } |
| 62 | |
Guido van Rossum | a9e7dc1 | 1992-10-18 18:53:57 +0000 | [diff] [blame] | 63 | /* Stack frames are allocated and deallocated at a considerable rate. |
| 64 | In an attempt to improve the speed of function calls, we maintain a |
| 65 | separate free list of stack frames (just like integers are |
| 66 | allocated in a special way -- see intobject.c). When a stack frame |
| 67 | is on the free list, only the following members have a meaning: |
| 68 | ob_type == &Frametype |
| 69 | f_back next item on free list, or NULL |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 70 | f_nlocals number of locals |
| 71 | f_stacksize size of value stack |
Guido van Rossum | a9e7dc1 | 1992-10-18 18:53:57 +0000 | [diff] [blame] | 72 | Note that the value and block stacks are preserved -- this can save |
| 73 | another malloc() call or two (and two free() calls as well!). |
| 74 | Also note that, unlike for integers, each frame object is a |
| 75 | malloc'ed object in its own right -- it is only the actual calls to |
| 76 | malloc() that we are trying to save here, not the administration. |
| 77 | After all, while a typical program may make millions of calls, a |
| 78 | call depth of more than 20 or 30 is probably already exceptional |
| 79 | unless the program contains run-away recursion. I hope. |
| 80 | */ |
| 81 | |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 82 | static PyFrameObject *free_list = NULL; |
Guido van Rossum | a9e7dc1 | 1992-10-18 18:53:57 +0000 | [diff] [blame] | 83 | |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 84 | static void |
| 85 | frame_dealloc(f) |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 86 | PyFrameObject *f; |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 87 | { |
Guido van Rossum | 7582bfb | 1997-02-14 16:27:29 +0000 | [diff] [blame] | 88 | int i; |
| 89 | PyObject **fastlocals; |
| 90 | |
Guido van Rossum | d724b23 | 2000-03-13 16:01:29 +0000 | [diff] [blame] | 91 | Py_TRASHCAN_SAFE_BEGIN(f) |
Guido van Rossum | 7582bfb | 1997-02-14 16:27:29 +0000 | [diff] [blame] | 92 | /* Kill all local variables */ |
| 93 | fastlocals = f->f_localsplus; |
| 94 | for (i = f->f_nlocals; --i >= 0; ++fastlocals) { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 95 | Py_XDECREF(*fastlocals); |
Guido van Rossum | 7582bfb | 1997-02-14 16:27:29 +0000 | [diff] [blame] | 96 | } |
| 97 | |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 98 | Py_XDECREF(f->f_back); |
| 99 | Py_XDECREF(f->f_code); |
| 100 | Py_XDECREF(f->f_builtins); |
| 101 | Py_XDECREF(f->f_globals); |
| 102 | Py_XDECREF(f->f_locals); |
| 103 | Py_XDECREF(f->f_trace); |
Guido van Rossum | a027efa | 1997-05-05 20:56:21 +0000 | [diff] [blame] | 104 | Py_XDECREF(f->f_exc_type); |
| 105 | Py_XDECREF(f->f_exc_value); |
| 106 | Py_XDECREF(f->f_exc_traceback); |
Guido van Rossum | a9e7dc1 | 1992-10-18 18:53:57 +0000 | [diff] [blame] | 107 | f->f_back = free_list; |
| 108 | free_list = f; |
Guido van Rossum | d724b23 | 2000-03-13 16:01:29 +0000 | [diff] [blame] | 109 | Py_TRASHCAN_SAFE_END(f) |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 110 | } |
| 111 | |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 112 | PyTypeObject PyFrame_Type = { |
| 113 | PyObject_HEAD_INIT(&PyType_Type) |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 114 | 0, |
| 115 | "frame", |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 116 | sizeof(PyFrameObject), |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 117 | 0, |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 118 | (destructor)frame_dealloc, /*tp_dealloc*/ |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 119 | 0, /*tp_print*/ |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 120 | (getattrfunc)frame_getattr, /*tp_getattr*/ |
| 121 | (setattrfunc)frame_setattr, /*tp_setattr*/ |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 122 | 0, /*tp_compare*/ |
| 123 | 0, /*tp_repr*/ |
| 124 | 0, /*tp_as_number*/ |
| 125 | 0, /*tp_as_sequence*/ |
| 126 | 0, /*tp_as_mapping*/ |
| 127 | }; |
| 128 | |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 129 | PyFrameObject * |
Guido van Rossum | a027efa | 1997-05-05 20:56:21 +0000 | [diff] [blame] | 130 | PyFrame_New(tstate, code, globals, locals) |
| 131 | PyThreadState *tstate; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 132 | PyCodeObject *code; |
| 133 | PyObject *globals; |
| 134 | PyObject *locals; |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 135 | { |
Guido van Rossum | a027efa | 1997-05-05 20:56:21 +0000 | [diff] [blame] | 136 | PyFrameObject *back = tstate->frame; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 137 | static PyObject *builtin_object; |
| 138 | PyFrameObject *f; |
| 139 | PyObject *builtins; |
Guido van Rossum | 67906af | 1998-09-25 14:11:46 +0000 | [diff] [blame] | 140 | int extras; |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 141 | |
Sjoerd Mullender | 5b7f3cd | 1995-04-04 11:47:41 +0000 | [diff] [blame] | 142 | if (builtin_object == NULL) { |
Guido van Rossum | b56933e | 1997-01-18 07:58:41 +0000 | [diff] [blame] | 143 | builtin_object = PyString_InternFromString("__builtins__"); |
Sjoerd Mullender | 5b7f3cd | 1995-04-04 11:47:41 +0000 | [diff] [blame] | 144 | if (builtin_object == NULL) |
| 145 | return NULL; |
| 146 | } |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 147 | if ((back != NULL && !PyFrame_Check(back)) || |
| 148 | code == NULL || !PyCode_Check(code) || |
| 149 | globals == NULL || !PyDict_Check(globals) || |
| 150 | (locals != NULL && !PyDict_Check(locals))) { |
| 151 | PyErr_BadInternalCall(); |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 152 | return NULL; |
| 153 | } |
Guido van Rossum | 67906af | 1998-09-25 14:11:46 +0000 | [diff] [blame] | 154 | extras = code->co_stacksize + code->co_nlocals; |
Guido van Rossum | bde6ff7 | 1998-02-19 20:48:26 +0000 | [diff] [blame] | 155 | if (back == NULL || back->f_globals != globals) { |
| 156 | builtins = PyDict_GetItem(globals, builtin_object); |
| 157 | if (builtins != NULL && PyModule_Check(builtins)) |
| 158 | builtins = PyModule_GetDict(builtins); |
| 159 | } |
| 160 | else { |
| 161 | /* If we share the globals, we share the builtins. |
| 162 | Save a lookup and a call. */ |
| 163 | builtins = back->f_builtins; |
| 164 | } |
Guido van Rossum | 404b95d | 1997-08-05 02:09:46 +0000 | [diff] [blame] | 165 | if (builtins != NULL && !PyDict_Check(builtins)) |
| 166 | builtins = NULL; |
Guido van Rossum | a9e7dc1 | 1992-10-18 18:53:57 +0000 | [diff] [blame] | 167 | if (free_list == NULL) { |
Guido van Rossum | b18618d | 2000-05-03 23:44:39 +0000 | [diff] [blame] | 168 | /* PyObject_New is inlined */ |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 169 | f = (PyFrameObject *) |
Guido van Rossum | b18618d | 2000-05-03 23:44:39 +0000 | [diff] [blame] | 170 | PyObject_MALLOC(sizeof(PyFrameObject) + |
| 171 | extras*sizeof(PyObject *)); |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 172 | if (f == NULL) |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 173 | return (PyFrameObject *)PyErr_NoMemory(); |
Guido van Rossum | b18618d | 2000-05-03 23:44:39 +0000 | [diff] [blame] | 174 | PyObject_INIT(f, &PyFrame_Type); |
Guido van Rossum | a9e7dc1 | 1992-10-18 18:53:57 +0000 | [diff] [blame] | 175 | } |
| 176 | else { |
| 177 | f = free_list; |
| 178 | free_list = free_list->f_back; |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 179 | if (f->f_nlocals + f->f_stacksize < extras) { |
Guido van Rossum | 6345ac6 | 1997-10-31 20:32:13 +0000 | [diff] [blame] | 180 | f = (PyFrameObject *) |
Guido van Rossum | b18618d | 2000-05-03 23:44:39 +0000 | [diff] [blame] | 181 | PyObject_REALLOC(f, sizeof(PyFrameObject) + |
| 182 | extras*sizeof(PyObject *)); |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 183 | if (f == NULL) |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 184 | return (PyFrameObject *)PyErr_NoMemory(); |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 185 | } |
Guido van Rossum | 747596a | 1997-01-24 04:00:21 +0000 | [diff] [blame] | 186 | else |
| 187 | extras = f->f_nlocals + f->f_stacksize; |
Guido van Rossum | b18618d | 2000-05-03 23:44:39 +0000 | [diff] [blame] | 188 | PyObject_INIT(f, &PyFrame_Type); |
Guido van Rossum | a9e7dc1 | 1992-10-18 18:53:57 +0000 | [diff] [blame] | 189 | } |
Guido van Rossum | 404b95d | 1997-08-05 02:09:46 +0000 | [diff] [blame] | 190 | if (builtins == NULL) { |
Guido van Rossum | bde6ff7 | 1998-02-19 20:48:26 +0000 | [diff] [blame] | 191 | /* No builtins! Make up a minimal one. */ |
Guido van Rossum | 404b95d | 1997-08-05 02:09:46 +0000 | [diff] [blame] | 192 | builtins = PyDict_New(); |
Guido van Rossum | f61618c | 1998-10-19 14:20:20 +0000 | [diff] [blame] | 193 | if (builtins == NULL || /* Give them 'None', at least. */ |
| 194 | PyDict_SetItemString(builtins, "None", Py_None) < 0) { |
| 195 | Py_DECREF(f); |
Guido van Rossum | 404b95d | 1997-08-05 02:09:46 +0000 | [diff] [blame] | 196 | return NULL; |
Guido van Rossum | f61618c | 1998-10-19 14:20:20 +0000 | [diff] [blame] | 197 | } |
Guido van Rossum | 404b95d | 1997-08-05 02:09:46 +0000 | [diff] [blame] | 198 | } |
| 199 | else |
| 200 | Py_XINCREF(builtins); |
| 201 | f->f_builtins = builtins; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 202 | Py_XINCREF(back); |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 203 | f->f_back = back; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 204 | Py_INCREF(code); |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 205 | f->f_code = code; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 206 | Py_INCREF(globals); |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 207 | f->f_globals = globals; |
Guido van Rossum | bdd207a | 1995-07-26 16:14:30 +0000 | [diff] [blame] | 208 | if (code->co_flags & CO_NEWLOCALS) { |
| 209 | if (code->co_flags & CO_OPTIMIZED) |
| 210 | locals = NULL; /* Let fast_2_locals handle it */ |
| 211 | else { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 212 | locals = PyDict_New(); |
Guido van Rossum | bdd207a | 1995-07-26 16:14:30 +0000 | [diff] [blame] | 213 | if (locals == NULL) { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 214 | Py_DECREF(f); |
Guido van Rossum | bdd207a | 1995-07-26 16:14:30 +0000 | [diff] [blame] | 215 | return NULL; |
| 216 | } |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 217 | } |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 218 | } |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 219 | else { |
| 220 | if (locals == NULL) |
| 221 | locals = globals; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 222 | Py_INCREF(locals); |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 223 | } |
| 224 | f->f_locals = locals; |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 225 | f->f_trace = NULL; |
Guido van Rossum | a027efa | 1997-05-05 20:56:21 +0000 | [diff] [blame] | 226 | f->f_exc_type = f->f_exc_value = f->f_exc_traceback = NULL; |
Guido van Rossum | eb46d67 | 1997-08-02 02:59:08 +0000 | [diff] [blame] | 227 | f->f_tstate = tstate; |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 228 | |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 229 | f->f_lasti = 0; |
Guido van Rossum | 747596a | 1997-01-24 04:00:21 +0000 | [diff] [blame] | 230 | f->f_lineno = code->co_firstlineno; |
Guido van Rossum | eb46d67 | 1997-08-02 02:59:08 +0000 | [diff] [blame] | 231 | f->f_restricted = (builtins != tstate->interp->builtins); |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 232 | f->f_iblock = 0; |
| 233 | f->f_nlocals = code->co_nlocals; |
Guido van Rossum | 747596a | 1997-01-24 04:00:21 +0000 | [diff] [blame] | 234 | f->f_stacksize = extras - code->co_nlocals; |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 235 | |
| 236 | while (--extras >= 0) |
| 237 | f->f_localsplus[extras] = NULL; |
| 238 | |
| 239 | f->f_valuestack = f->f_localsplus + f->f_nlocals; |
| 240 | |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 241 | return f; |
| 242 | } |
| 243 | |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 244 | /* Block management */ |
| 245 | |
| 246 | void |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 247 | PyFrame_BlockSetup(f, type, handler, level) |
| 248 | PyFrameObject *f; |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 249 | int type; |
| 250 | int handler; |
| 251 | int level; |
| 252 | { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 253 | PyTryBlock *b; |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 254 | if (f->f_iblock >= CO_MAXBLOCKS) |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 255 | Py_FatalError("XXX block stack overflow"); |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 256 | b = &f->f_blockstack[f->f_iblock++]; |
| 257 | b->b_type = type; |
| 258 | b->b_level = level; |
| 259 | b->b_handler = handler; |
| 260 | } |
| 261 | |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 262 | PyTryBlock * |
| 263 | PyFrame_BlockPop(f) |
| 264 | PyFrameObject *f; |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 265 | { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 266 | PyTryBlock *b; |
Guido van Rossum | d7047b3 | 1995-01-02 19:07:15 +0000 | [diff] [blame] | 267 | if (f->f_iblock <= 0) |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 268 | Py_FatalError("XXX block stack underflow"); |
Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 269 | b = &f->f_blockstack[--f->f_iblock]; |
| 270 | return b; |
| 271 | } |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 272 | |
| 273 | /* Convert between "fast" version of locals and dictionary version */ |
| 274 | |
| 275 | void |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 276 | PyFrame_FastToLocals(f) |
| 277 | PyFrameObject *f; |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 278 | { |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 279 | /* Merge fast locals into f->f_locals */ |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 280 | PyObject *locals, *map; |
| 281 | PyObject **fast; |
| 282 | PyObject *error_type, *error_value, *error_traceback; |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 283 | int j; |
| 284 | if (f == NULL) |
| 285 | return; |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 286 | locals = f->f_locals; |
| 287 | if (locals == NULL) { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 288 | locals = f->f_locals = PyDict_New(); |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 289 | if (locals == NULL) { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 290 | PyErr_Clear(); /* Can't report it :-( */ |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 291 | return; |
| 292 | } |
| 293 | } |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 294 | if (f->f_nlocals == 0) |
Guido van Rossum | bdd207a | 1995-07-26 16:14:30 +0000 | [diff] [blame] | 295 | return; |
| 296 | map = f->f_code->co_varnames; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 297 | if (!PyDict_Check(locals) || !PyTuple_Check(map)) |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 298 | return; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 299 | PyErr_Fetch(&error_type, &error_value, &error_traceback); |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 300 | fast = f->f_localsplus; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 301 | j = PyTuple_Size(map); |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 302 | if (j > f->f_nlocals) |
| 303 | j = f->f_nlocals; |
| 304 | for (; --j >= 0; ) { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 305 | PyObject *key = PyTuple_GetItem(map, j); |
| 306 | PyObject *value = fast[j]; |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 307 | if (value == NULL) { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 308 | PyErr_Clear(); |
| 309 | if (PyDict_DelItem(locals, key) != 0) |
| 310 | PyErr_Clear(); |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 311 | } |
| 312 | else { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 313 | if (PyDict_SetItem(locals, key, value) != 0) |
| 314 | PyErr_Clear(); |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 315 | } |
| 316 | } |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 317 | PyErr_Restore(error_type, error_value, error_traceback); |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 318 | } |
| 319 | |
| 320 | void |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 321 | PyFrame_LocalsToFast(f, clear) |
| 322 | PyFrameObject *f; |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 323 | int clear; |
| 324 | { |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 325 | /* Merge f->f_locals into fast locals */ |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 326 | PyObject *locals, *map; |
| 327 | PyObject **fast; |
| 328 | PyObject *error_type, *error_value, *error_traceback; |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 329 | int j; |
| 330 | if (f == NULL) |
| 331 | return; |
| 332 | locals = f->f_locals; |
Guido van Rossum | 2271bf7 | 1995-07-18 14:30:34 +0000 | [diff] [blame] | 333 | map = f->f_code->co_varnames; |
Guido van Rossum | 3bb63a8 | 1997-01-20 04:29:16 +0000 | [diff] [blame] | 334 | if (locals == NULL || f->f_code->co_nlocals == 0) |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 335 | return; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 336 | if (!PyDict_Check(locals) || !PyTuple_Check(map)) |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 337 | return; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 338 | PyErr_Fetch(&error_type, &error_value, &error_traceback); |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 339 | fast = f->f_localsplus; |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 340 | j = PyTuple_Size(map); |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 341 | if (j > f->f_nlocals) |
| 342 | j = f->f_nlocals; |
| 343 | for (; --j >= 0; ) { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 344 | PyObject *key = PyTuple_GetItem(map, j); |
| 345 | PyObject *value = PyDict_GetItem(locals, key); |
Guido van Rossum | e23eb57 | 1998-05-14 01:49:48 +0000 | [diff] [blame] | 346 | Py_XINCREF(value); |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 347 | if (value != NULL || clear) { |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 348 | Py_XDECREF(fast[j]); |
Guido van Rossum | f3e85a0 | 1997-01-20 04:20:52 +0000 | [diff] [blame] | 349 | fast[j] = value; |
| 350 | } |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 351 | } |
Guido van Rossum | 1875247 | 1997-04-29 14:49:28 +0000 | [diff] [blame] | 352 | PyErr_Restore(error_type, error_value, error_traceback); |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 353 | } |
Guido van Rossum | 404b95d | 1997-08-05 02:09:46 +0000 | [diff] [blame] | 354 | |
| 355 | /* Clear out the free list */ |
| 356 | |
| 357 | void |
| 358 | PyFrame_Fini() |
| 359 | { |
| 360 | while (free_list != NULL) { |
| 361 | PyFrameObject *f = free_list; |
| 362 | free_list = free_list->f_back; |
Guido van Rossum | b18618d | 2000-05-03 23:44:39 +0000 | [diff] [blame] | 363 | PyObject_DEL(f); |
Guido van Rossum | 404b95d | 1997-08-05 02:09:46 +0000 | [diff] [blame] | 364 | } |
| 365 | } |