Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1 | /* Abstract Object Interface (many thanks to Jim Fulton) */ |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 2 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 3 | |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 4 | #include "Python.h" |
Guido van Rossum | fa0b6ab | 1998-05-22 15:23:36 +0000 | [diff] [blame] | 5 | #include <ctype.h> |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 6 | #include "structmember.h" /* we need the offsetof() macro from there */ |
Tim Peters | 64b5ce3 | 2001-09-10 20:52:51 +0000 | [diff] [blame] | 7 | #include "longintrepr.h" |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 8 | |
| 9 | #define NEW_STYLE_NUMBER(o) PyType_HasFeature((o)->ob_type, \ |
Guido van Rossum | c318969 | 2001-01-17 15:29:42 +0000 | [diff] [blame] | 10 | Py_TPFLAGS_CHECKTYPES) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 11 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 12 | /* Shorthands to return certain errors */ |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 13 | |
| 14 | static PyObject * |
Fred Drake | 4201b9e | 2000-07-09 04:34:13 +0000 | [diff] [blame] | 15 | type_error(const char *msg) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 16 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 17 | PyErr_SetString(PyExc_TypeError, msg); |
| 18 | return NULL; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 19 | } |
| 20 | |
Guido van Rossum | 052b7e1 | 1996-11-11 15:08:19 +0000 | [diff] [blame] | 21 | static PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 22 | null_error(void) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 23 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 24 | if (!PyErr_Occurred()) |
| 25 | PyErr_SetString(PyExc_SystemError, |
| 26 | "null argument to internal routine"); |
| 27 | return NULL; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 28 | } |
| 29 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 30 | /* Operations on any object */ |
| 31 | |
| 32 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 33 | PyObject_Cmp(PyObject *o1, PyObject *o2, int *result) |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 34 | { |
| 35 | int r; |
| 36 | |
| 37 | if (o1 == NULL || o2 == NULL) { |
| 38 | null_error(); |
| 39 | return -1; |
| 40 | } |
| 41 | r = PyObject_Compare(o1, o2); |
| 42 | if (PyErr_Occurred()) |
| 43 | return -1; |
| 44 | *result = r; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 45 | return 0; |
| 46 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 47 | |
| 48 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 49 | PyObject_Type(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 50 | { |
| 51 | PyObject *v; |
| 52 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 53 | if (o == NULL) |
| 54 | return null_error(); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 55 | v = (PyObject *)o->ob_type; |
| 56 | Py_INCREF(v); |
| 57 | return v; |
| 58 | } |
| 59 | |
| 60 | int |
Jeremy Hylton | 6253f83 | 2000-07-12 12:56:19 +0000 | [diff] [blame] | 61 | PyObject_Size(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 62 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 63 | PySequenceMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 64 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 65 | if (o == NULL) { |
| 66 | null_error(); |
| 67 | return -1; |
| 68 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 69 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 70 | m = o->ob_type->tp_as_sequence; |
| 71 | if (m && m->sq_length) |
| 72 | return m->sq_length(o); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 73 | |
Jeremy Hylton | 6253f83 | 2000-07-12 12:56:19 +0000 | [diff] [blame] | 74 | return PyMapping_Size(o); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 75 | } |
| 76 | |
Marc-André Lemburg | cf5f358 | 2000-07-17 09:22:55 +0000 | [diff] [blame] | 77 | #undef PyObject_Length |
| 78 | int |
| 79 | PyObject_Length(PyObject *o) |
| 80 | { |
| 81 | return PyObject_Size(o); |
| 82 | } |
| 83 | #define PyObject_Length PyObject_Size |
| 84 | |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 85 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 86 | PyObject_GetItem(PyObject *o, PyObject *key) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 87 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 88 | PyMappingMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 89 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 90 | if (o == NULL || key == NULL) |
| 91 | return null_error(); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 92 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 93 | m = o->ob_type->tp_as_mapping; |
| 94 | if (m && m->mp_subscript) |
| 95 | return m->mp_subscript(o, key); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 96 | |
Guido van Rossum | 2130824 | 1998-08-13 16:44:44 +0000 | [diff] [blame] | 97 | if (o->ob_type->tp_as_sequence) { |
| 98 | if (PyInt_Check(key)) |
| 99 | return PySequence_GetItem(o, PyInt_AsLong(key)); |
Andrew M. Kuchling | 0f223d2 | 2000-02-23 22:21:50 +0000 | [diff] [blame] | 100 | else if (PyLong_Check(key)) { |
| 101 | long key_value = PyLong_AsLong(key); |
| 102 | if (key_value == -1 && PyErr_Occurred()) |
| 103 | return NULL; |
| 104 | return PySequence_GetItem(o, key_value); |
| 105 | } |
Guido van Rossum | 2130824 | 1998-08-13 16:44:44 +0000 | [diff] [blame] | 106 | return type_error("sequence index must be integer"); |
| 107 | } |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 108 | |
| 109 | return type_error("unsubscriptable object"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 110 | } |
| 111 | |
| 112 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 113 | PyObject_SetItem(PyObject *o, PyObject *key, PyObject *value) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 114 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 115 | PyMappingMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 116 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 117 | if (o == NULL || key == NULL || value == NULL) { |
| 118 | null_error(); |
| 119 | return -1; |
| 120 | } |
| 121 | m = o->ob_type->tp_as_mapping; |
| 122 | if (m && m->mp_ass_subscript) |
| 123 | return m->mp_ass_subscript(o, key, value); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 124 | |
Guido van Rossum | 2130824 | 1998-08-13 16:44:44 +0000 | [diff] [blame] | 125 | if (o->ob_type->tp_as_sequence) { |
| 126 | if (PyInt_Check(key)) |
| 127 | return PySequence_SetItem(o, PyInt_AsLong(key), value); |
Andrew M. Kuchling | 0f223d2 | 2000-02-23 22:21:50 +0000 | [diff] [blame] | 128 | else if (PyLong_Check(key)) { |
| 129 | long key_value = PyLong_AsLong(key); |
| 130 | if (key_value == -1 && PyErr_Occurred()) |
| 131 | return -1; |
| 132 | return PySequence_SetItem(o, key_value, value); |
| 133 | } |
Guido van Rossum | 2130824 | 1998-08-13 16:44:44 +0000 | [diff] [blame] | 134 | type_error("sequence index must be integer"); |
| 135 | return -1; |
| 136 | } |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 137 | |
| 138 | type_error("object does not support item assignment"); |
| 139 | return -1; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 140 | } |
| 141 | |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 142 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 143 | PyObject_DelItem(PyObject *o, PyObject *key) |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 144 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 145 | PyMappingMethods *m; |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 146 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 147 | if (o == NULL || key == NULL) { |
| 148 | null_error(); |
| 149 | return -1; |
| 150 | } |
| 151 | m = o->ob_type->tp_as_mapping; |
| 152 | if (m && m->mp_ass_subscript) |
| 153 | return m->mp_ass_subscript(o, key, (PyObject*)NULL); |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 154 | |
Guido van Rossum | 2130824 | 1998-08-13 16:44:44 +0000 | [diff] [blame] | 155 | if (o->ob_type->tp_as_sequence) { |
| 156 | if (PyInt_Check(key)) |
| 157 | return PySequence_DelItem(o, PyInt_AsLong(key)); |
Andrew M. Kuchling | 0f223d2 | 2000-02-23 22:21:50 +0000 | [diff] [blame] | 158 | else if (PyLong_Check(key)) { |
| 159 | long key_value = PyLong_AsLong(key); |
| 160 | if (key_value == -1 && PyErr_Occurred()) |
| 161 | return -1; |
| 162 | return PySequence_DelItem(o, key_value); |
| 163 | } |
Guido van Rossum | 2130824 | 1998-08-13 16:44:44 +0000 | [diff] [blame] | 164 | type_error("sequence index must be integer"); |
| 165 | return -1; |
| 166 | } |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 167 | |
| 168 | type_error("object does not support item deletion"); |
| 169 | return -1; |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 170 | } |
| 171 | |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 172 | int PyObject_AsCharBuffer(PyObject *obj, |
| 173 | const char **buffer, |
| 174 | int *buffer_len) |
| 175 | { |
| 176 | PyBufferProcs *pb; |
| 177 | const char *pp; |
| 178 | int len; |
| 179 | |
| 180 | if (obj == NULL || buffer == NULL || buffer_len == NULL) { |
| 181 | null_error(); |
| 182 | return -1; |
| 183 | } |
| 184 | pb = obj->ob_type->tp_as_buffer; |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 185 | if (pb == NULL || |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 186 | pb->bf_getcharbuffer == NULL || |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 187 | pb->bf_getsegcount == NULL) { |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 188 | PyErr_SetString(PyExc_TypeError, |
| 189 | "expected a character buffer object"); |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 190 | return -1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 191 | } |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 192 | if ((*pb->bf_getsegcount)(obj,NULL) != 1) { |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 193 | PyErr_SetString(PyExc_TypeError, |
| 194 | "expected a single-segment buffer object"); |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 195 | return -1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 196 | } |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 197 | len = (*pb->bf_getcharbuffer)(obj, 0, &pp); |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 198 | if (len < 0) |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 199 | return -1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 200 | *buffer = pp; |
| 201 | *buffer_len = len; |
| 202 | return 0; |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 203 | } |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 204 | |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 205 | int |
| 206 | PyObject_CheckReadBuffer(PyObject *obj) |
| 207 | { |
| 208 | PyBufferProcs *pb = obj->ob_type->tp_as_buffer; |
| 209 | |
| 210 | if (pb == NULL || |
| 211 | pb->bf_getreadbuffer == NULL || |
| 212 | pb->bf_getsegcount == NULL || |
| 213 | (*pb->bf_getsegcount)(obj, NULL) != 1) |
| 214 | return 0; |
| 215 | return 1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 216 | } |
| 217 | |
| 218 | int PyObject_AsReadBuffer(PyObject *obj, |
| 219 | const void **buffer, |
| 220 | int *buffer_len) |
| 221 | { |
| 222 | PyBufferProcs *pb; |
| 223 | void *pp; |
| 224 | int len; |
| 225 | |
| 226 | if (obj == NULL || buffer == NULL || buffer_len == NULL) { |
| 227 | null_error(); |
| 228 | return -1; |
| 229 | } |
| 230 | pb = obj->ob_type->tp_as_buffer; |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 231 | if (pb == NULL || |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 232 | pb->bf_getreadbuffer == NULL || |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 233 | pb->bf_getsegcount == NULL) { |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 234 | PyErr_SetString(PyExc_TypeError, |
| 235 | "expected a readable buffer object"); |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 236 | return -1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 237 | } |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 238 | if ((*pb->bf_getsegcount)(obj, NULL) != 1) { |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 239 | PyErr_SetString(PyExc_TypeError, |
| 240 | "expected a single-segment buffer object"); |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 241 | return -1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 242 | } |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 243 | len = (*pb->bf_getreadbuffer)(obj, 0, &pp); |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 244 | if (len < 0) |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 245 | return -1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 246 | *buffer = pp; |
| 247 | *buffer_len = len; |
| 248 | return 0; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 249 | } |
| 250 | |
| 251 | int PyObject_AsWriteBuffer(PyObject *obj, |
| 252 | void **buffer, |
| 253 | int *buffer_len) |
| 254 | { |
| 255 | PyBufferProcs *pb; |
| 256 | void*pp; |
| 257 | int len; |
| 258 | |
| 259 | if (obj == NULL || buffer == NULL || buffer_len == NULL) { |
| 260 | null_error(); |
| 261 | return -1; |
| 262 | } |
| 263 | pb = obj->ob_type->tp_as_buffer; |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 264 | if (pb == NULL || |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 265 | pb->bf_getwritebuffer == NULL || |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 266 | pb->bf_getsegcount == NULL) { |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 267 | PyErr_SetString(PyExc_TypeError, |
| 268 | "expected a writeable buffer object"); |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 269 | return -1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 270 | } |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 271 | if ((*pb->bf_getsegcount)(obj, NULL) != 1) { |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 272 | PyErr_SetString(PyExc_TypeError, |
| 273 | "expected a single-segment buffer object"); |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 274 | return -1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 275 | } |
| 276 | len = (*pb->bf_getwritebuffer)(obj,0,&pp); |
| 277 | if (len < 0) |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 278 | return -1; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 279 | *buffer = pp; |
| 280 | *buffer_len = len; |
| 281 | return 0; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 282 | } |
| 283 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 284 | /* Operations on numbers */ |
| 285 | |
| 286 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 287 | PyNumber_Check(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 288 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 289 | return o && o->ob_type->tp_as_number; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 290 | } |
| 291 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 292 | /* Binary operators */ |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 293 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 294 | /* New style number protocol support */ |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 295 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 296 | #define NB_SLOT(x) offsetof(PyNumberMethods, x) |
| 297 | #define NB_BINOP(nb_methods, slot) \ |
| 298 | ((binaryfunc*)(& ((char*)nb_methods)[slot] )) |
| 299 | #define NB_TERNOP(nb_methods, slot) \ |
| 300 | ((ternaryfunc*)(& ((char*)nb_methods)[slot] )) |
| 301 | |
| 302 | /* |
| 303 | Calling scheme used for binary operations: |
| 304 | |
| 305 | v w Action |
| 306 | ------------------------------------------------------------------- |
Guido van Rossum | 4bb1e36 | 2001-09-28 23:49:48 +0000 | [diff] [blame] | 307 | new new w.op(v,w)[*], v.op(v,w), w.op(v,w) |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 308 | new old v.op(v,w), coerce(v,w), v.op(v,w) |
| 309 | old new w.op(v,w), coerce(v,w), v.op(v,w) |
| 310 | old old coerce(v,w), v.op(v,w) |
| 311 | |
Guido van Rossum | 4bb1e36 | 2001-09-28 23:49:48 +0000 | [diff] [blame] | 312 | [*] only when v->ob_type != w->ob_type && w->ob_type is a subclass of |
| 313 | v->ob_type |
| 314 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 315 | Legend: |
| 316 | ------- |
| 317 | * new == new style number |
| 318 | * old == old style number |
| 319 | * Action indicates the order in which operations are tried until either |
| 320 | a valid result is produced or an error occurs. |
| 321 | |
| 322 | */ |
| 323 | |
| 324 | static PyObject * |
| 325 | binary_op1(PyObject *v, PyObject *w, const int op_slot) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 326 | { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 327 | PyObject *x; |
Guido van Rossum | 4bb1e36 | 2001-09-28 23:49:48 +0000 | [diff] [blame] | 328 | binaryfunc slotv = NULL; |
| 329 | binaryfunc slotw = NULL; |
| 330 | |
| 331 | if (v->ob_type->tp_as_number != NULL && NEW_STYLE_NUMBER(v)) |
| 332 | slotv = *NB_BINOP(v->ob_type->tp_as_number, op_slot); |
| 333 | if (w->ob_type != v->ob_type && |
| 334 | w->ob_type->tp_as_number != NULL && NEW_STYLE_NUMBER(w)) { |
| 335 | slotw = *NB_BINOP(w->ob_type->tp_as_number, op_slot); |
| 336 | if (slotw == slotv) |
| 337 | slotw = NULL; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 338 | } |
Guido van Rossum | 4bb1e36 | 2001-09-28 23:49:48 +0000 | [diff] [blame] | 339 | if (slotv) { |
Guido van Rossum | 89c4264 | 2001-10-01 17:10:18 +0000 | [diff] [blame] | 340 | if (slotw && PyType_IsSubtype(w->ob_type, v->ob_type)) { |
| 341 | x = slotw(v, w); |
| 342 | if (x != Py_NotImplemented) |
| 343 | return x; |
| 344 | Py_DECREF(x); /* can't do it */ |
| 345 | slotw = NULL; |
| 346 | } |
Guido van Rossum | 4bb1e36 | 2001-09-28 23:49:48 +0000 | [diff] [blame] | 347 | x = slotv(v, w); |
| 348 | if (x != Py_NotImplemented) |
| 349 | return x; |
| 350 | Py_DECREF(x); /* can't do it */ |
| 351 | } |
| 352 | if (slotw) { |
| 353 | x = slotw(v, w); |
| 354 | if (x != Py_NotImplemented) |
| 355 | return x; |
| 356 | Py_DECREF(x); /* can't do it */ |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 357 | } |
| 358 | if (!NEW_STYLE_NUMBER(v) || !NEW_STYLE_NUMBER(w)) { |
| 359 | int err = PyNumber_CoerceEx(&v, &w); |
| 360 | if (err < 0) { |
| 361 | return NULL; |
| 362 | } |
| 363 | if (err == 0) { |
| 364 | PyNumberMethods *mv = v->ob_type->tp_as_number; |
| 365 | if (mv) { |
Guido van Rossum | 4bb1e36 | 2001-09-28 23:49:48 +0000 | [diff] [blame] | 366 | binaryfunc slot; |
| 367 | slot = *NB_BINOP(mv, op_slot); |
| 368 | if (slot) { |
| 369 | PyObject *x = slot(v, w); |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 370 | Py_DECREF(v); |
| 371 | Py_DECREF(w); |
| 372 | return x; |
| 373 | } |
| 374 | } |
| 375 | /* CoerceEx incremented the reference counts */ |
| 376 | Py_DECREF(v); |
| 377 | Py_DECREF(w); |
| 378 | } |
| 379 | } |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 380 | Py_INCREF(Py_NotImplemented); |
| 381 | return Py_NotImplemented; |
| 382 | } |
| 383 | |
| 384 | static PyObject * |
| 385 | binary_op(PyObject *v, PyObject *w, const int op_slot, const char *op_name) |
| 386 | { |
| 387 | PyObject *result = binary_op1(v, w, op_slot); |
| 388 | if (result == Py_NotImplemented) { |
| 389 | Py_DECREF(Py_NotImplemented); |
Guido van Rossum | 5c66a26 | 2001-10-22 04:12:44 +0000 | [diff] [blame] | 390 | PyErr_Format( |
| 391 | PyExc_TypeError, |
| 392 | "unsupported operand type(s) for %s: '%s' and '%s'", |
| 393 | op_name, |
| 394 | v->ob_type->tp_name, |
| 395 | w->ob_type->tp_name); |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 396 | return NULL; |
| 397 | } |
| 398 | return result; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 399 | } |
| 400 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 401 | |
| 402 | /* |
| 403 | Calling scheme used for ternary operations: |
| 404 | |
Guido van Rossum | 84675ac | 2001-09-29 01:05:03 +0000 | [diff] [blame] | 405 | *** In some cases, w.op is called before v.op; see binary_op1. *** |
| 406 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 407 | v w z Action |
| 408 | ------------------------------------------------------------------- |
| 409 | new new new v.op(v,w,z), w.op(v,w,z), z.op(v,w,z) |
| 410 | new old new v.op(v,w,z), z.op(v,w,z), coerce(v,w,z), v.op(v,w,z) |
| 411 | old new new w.op(v,w,z), z.op(v,w,z), coerce(v,w,z), v.op(v,w,z) |
| 412 | old old new z.op(v,w,z), coerce(v,w,z), v.op(v,w,z) |
| 413 | new new old v.op(v,w,z), w.op(v,w,z), coerce(v,w,z), v.op(v,w,z) |
| 414 | new old old v.op(v,w,z), coerce(v,w,z), v.op(v,w,z) |
| 415 | old new old w.op(v,w,z), coerce(v,w,z), v.op(v,w,z) |
| 416 | old old old coerce(v,w,z), v.op(v,w,z) |
| 417 | |
| 418 | Legend: |
| 419 | ------- |
| 420 | * new == new style number |
| 421 | * old == old style number |
| 422 | * Action indicates the order in which operations are tried until either |
| 423 | a valid result is produced or an error occurs. |
| 424 | * coerce(v,w,z) actually does: coerce(v,w), coerce(v,z), coerce(w,z) and |
| 425 | only if z != Py_None; if z == Py_None, then it is treated as absent |
| 426 | variable and only coerce(v,w) is tried. |
| 427 | |
| 428 | */ |
| 429 | |
| 430 | static PyObject * |
| 431 | ternary_op(PyObject *v, |
| 432 | PyObject *w, |
| 433 | PyObject *z, |
| 434 | const int op_slot, |
| 435 | const char *op_name) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 436 | { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 437 | PyNumberMethods *mv, *mw, *mz; |
Guido van Rossum | 84675ac | 2001-09-29 01:05:03 +0000 | [diff] [blame] | 438 | PyObject *x = NULL; |
| 439 | ternaryfunc slotv = NULL; |
| 440 | ternaryfunc slotw = NULL; |
| 441 | ternaryfunc slotz = NULL; |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 442 | |
| 443 | mv = v->ob_type->tp_as_number; |
Guido van Rossum | 4bb1e36 | 2001-09-28 23:49:48 +0000 | [diff] [blame] | 444 | mw = w->ob_type->tp_as_number; |
Guido van Rossum | 84675ac | 2001-09-29 01:05:03 +0000 | [diff] [blame] | 445 | if (mv != NULL && NEW_STYLE_NUMBER(v)) |
| 446 | slotv = *NB_TERNOP(mv, op_slot); |
| 447 | if (w->ob_type != v->ob_type && |
| 448 | mv != NULL && NEW_STYLE_NUMBER(w)) { |
| 449 | slotw = *NB_TERNOP(mw, op_slot); |
| 450 | if (slotw == slotv) |
| 451 | slotw = NULL; |
Guido van Rossum | 4bb1e36 | 2001-09-28 23:49:48 +0000 | [diff] [blame] | 452 | } |
Guido van Rossum | 84675ac | 2001-09-29 01:05:03 +0000 | [diff] [blame] | 453 | if (slotv) { |
Guido van Rossum | 89c4264 | 2001-10-01 17:10:18 +0000 | [diff] [blame] | 454 | if (slotw && PyType_IsSubtype(w->ob_type, v->ob_type)) { |
| 455 | x = slotw(v, w, z); |
| 456 | if (x != Py_NotImplemented) |
| 457 | return x; |
| 458 | Py_DECREF(x); /* can't do it */ |
| 459 | slotw = NULL; |
| 460 | } |
Guido van Rossum | 84675ac | 2001-09-29 01:05:03 +0000 | [diff] [blame] | 461 | x = slotv(v, w, z); |
| 462 | if (x != Py_NotImplemented) |
| 463 | return x; |
| 464 | Py_DECREF(x); /* can't do it */ |
| 465 | } |
| 466 | if (slotw) { |
| 467 | x = slotw(v, w, z); |
| 468 | if (x != Py_NotImplemented) |
| 469 | return x; |
| 470 | Py_DECREF(x); /* can't do it */ |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 471 | } |
| 472 | mz = z->ob_type->tp_as_number; |
| 473 | if (mz != NULL && NEW_STYLE_NUMBER(z)) { |
Guido van Rossum | 84675ac | 2001-09-29 01:05:03 +0000 | [diff] [blame] | 474 | slotz = *NB_TERNOP(mz, op_slot); |
| 475 | if (slotz == slotv || slotz == slotw) |
| 476 | slotz = NULL; |
| 477 | if (slotz) { |
| 478 | x = slotz(v, w, z); |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 479 | if (x != Py_NotImplemented) |
| 480 | return x; |
Guido van Rossum | 84675ac | 2001-09-29 01:05:03 +0000 | [diff] [blame] | 481 | Py_DECREF(x); /* can't do it */ |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 482 | } |
| 483 | } |
| 484 | |
| 485 | if (!NEW_STYLE_NUMBER(v) || !NEW_STYLE_NUMBER(w) || |
| 486 | (z != Py_None && !NEW_STYLE_NUMBER(z))) { |
| 487 | /* we have an old style operand, coerce */ |
| 488 | PyObject *v1, *z1, *w2, *z2; |
| 489 | int c; |
| 490 | |
| 491 | c = PyNumber_Coerce(&v, &w); |
| 492 | if (c != 0) |
| 493 | goto error3; |
| 494 | |
| 495 | /* Special case: if the third argument is None, it is |
| 496 | treated as absent argument and not coerced. */ |
| 497 | if (z == Py_None) { |
| 498 | if (v->ob_type->tp_as_number) { |
Guido van Rossum | 84675ac | 2001-09-29 01:05:03 +0000 | [diff] [blame] | 499 | slotz = *NB_TERNOP(v->ob_type->tp_as_number, |
| 500 | op_slot); |
| 501 | if (slotz) |
| 502 | x = slotz(v, w, z); |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 503 | else |
| 504 | c = -1; |
| 505 | } |
| 506 | else |
| 507 | c = -1; |
| 508 | goto error2; |
| 509 | } |
| 510 | v1 = v; |
| 511 | z1 = z; |
| 512 | c = PyNumber_Coerce(&v1, &z1); |
| 513 | if (c != 0) |
| 514 | goto error2; |
| 515 | w2 = w; |
| 516 | z2 = z1; |
| 517 | c = PyNumber_Coerce(&w2, &z2); |
| 518 | if (c != 0) |
| 519 | goto error1; |
| 520 | |
| 521 | if (v1->ob_type->tp_as_number != NULL) { |
Guido van Rossum | 84675ac | 2001-09-29 01:05:03 +0000 | [diff] [blame] | 522 | slotv = *NB_TERNOP(v1->ob_type->tp_as_number, |
| 523 | op_slot); |
| 524 | if (slotv) |
| 525 | x = slotv(v1, w2, z2); |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 526 | else |
| 527 | c = -1; |
| 528 | } |
| 529 | else |
| 530 | c = -1; |
| 531 | |
| 532 | Py_DECREF(w2); |
| 533 | Py_DECREF(z2); |
| 534 | error1: |
| 535 | Py_DECREF(v1); |
| 536 | Py_DECREF(z1); |
| 537 | error2: |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 538 | Py_DECREF(v); |
| 539 | Py_DECREF(w); |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 540 | error3: |
| 541 | if (c >= 0) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 542 | return x; |
| 543 | } |
Guido van Rossum | 5c66a26 | 2001-10-22 04:12:44 +0000 | [diff] [blame] | 544 | |
| 545 | if (z == Py_None) |
| 546 | PyErr_Format( |
| 547 | PyExc_TypeError, |
| 548 | "unsupported operand type(s) for ** or pow(): " |
| 549 | "'%s' and '%s'", |
| 550 | v->ob_type->tp_name, |
| 551 | w->ob_type->tp_name); |
| 552 | else |
| 553 | PyErr_Format( |
| 554 | PyExc_TypeError, |
| 555 | "unsupported operand type(s) for pow(): " |
| 556 | "'%s', '%s', '%s'", |
| 557 | v->ob_type->tp_name, |
| 558 | w->ob_type->tp_name, |
| 559 | z->ob_type->tp_name); |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 560 | return NULL; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 561 | } |
| 562 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 563 | #define BINARY_FUNC(func, op, op_name) \ |
| 564 | PyObject * \ |
| 565 | func(PyObject *v, PyObject *w) { \ |
| 566 | return binary_op(v, w, NB_SLOT(op), op_name); \ |
| 567 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 568 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 569 | BINARY_FUNC(PyNumber_Or, nb_or, "|") |
| 570 | BINARY_FUNC(PyNumber_Xor, nb_xor, "^") |
| 571 | BINARY_FUNC(PyNumber_And, nb_and, "&") |
| 572 | BINARY_FUNC(PyNumber_Lshift, nb_lshift, "<<") |
| 573 | BINARY_FUNC(PyNumber_Rshift, nb_rshift, ">>") |
| 574 | BINARY_FUNC(PyNumber_Subtract, nb_subtract, "-") |
| 575 | BINARY_FUNC(PyNumber_Multiply, nb_multiply, "*") |
| 576 | BINARY_FUNC(PyNumber_Divide, nb_divide, "/") |
| 577 | BINARY_FUNC(PyNumber_Divmod, nb_divmod, "divmod()") |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 578 | |
| 579 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 580 | PyNumber_Add(PyObject *v, PyObject *w) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 581 | { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 582 | PyObject *result = binary_op1(v, w, NB_SLOT(nb_add)); |
| 583 | if (result == Py_NotImplemented) { |
| 584 | PySequenceMethods *m = v->ob_type->tp_as_sequence; |
| 585 | Py_DECREF(Py_NotImplemented); |
| 586 | if (m && m->sq_concat) { |
| 587 | result = (*m->sq_concat)(v, w); |
Andrew M. Kuchling | 1991ddc | 2000-02-14 22:22:04 +0000 | [diff] [blame] | 588 | } |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 589 | else { |
Guido van Rossum | 5c66a26 | 2001-10-22 04:12:44 +0000 | [diff] [blame] | 590 | PyErr_Format( |
| 591 | PyExc_TypeError, |
| 592 | "unsupported operand types for +: '%s' and '%s'", |
| 593 | v->ob_type->tp_name, |
| 594 | w->ob_type->tp_name); |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 595 | result = NULL; |
| 596 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 597 | } |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 598 | return result; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 599 | } |
| 600 | |
| 601 | PyObject * |
Guido van Rossum | 4668b00 | 2001-08-08 05:00:18 +0000 | [diff] [blame] | 602 | PyNumber_FloorDivide(PyObject *v, PyObject *w) |
| 603 | { |
| 604 | /* XXX tp_flags test */ |
| 605 | return binary_op(v, w, NB_SLOT(nb_floor_divide), "//"); |
| 606 | } |
| 607 | |
| 608 | PyObject * |
| 609 | PyNumber_TrueDivide(PyObject *v, PyObject *w) |
| 610 | { |
| 611 | /* XXX tp_flags test */ |
| 612 | return binary_op(v, w, NB_SLOT(nb_true_divide), "/"); |
| 613 | } |
| 614 | |
| 615 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 616 | PyNumber_Remainder(PyObject *v, PyObject *w) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 617 | { |
Guido van Rossum | fa0b6ab | 1998-05-22 15:23:36 +0000 | [diff] [blame] | 618 | if (PyString_Check(v)) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 619 | return PyString_Format(v, w); |
Martin v. Löwis | 339d0f7 | 2001-08-17 18:39:25 +0000 | [diff] [blame] | 620 | #ifdef Py_USING_UNICODE |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 621 | else if (PyUnicode_Check(v)) |
| 622 | return PyUnicode_Format(v, w); |
Martin v. Löwis | 339d0f7 | 2001-08-17 18:39:25 +0000 | [diff] [blame] | 623 | #endif |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 624 | return binary_op(v, w, NB_SLOT(nb_remainder), "%"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 625 | } |
| 626 | |
| 627 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 628 | PyNumber_Power(PyObject *v, PyObject *w, PyObject *z) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 629 | { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 630 | return ternary_op(v, w, z, NB_SLOT(nb_power), "** or pow()"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 631 | } |
| 632 | |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 633 | /* Binary in-place operators */ |
| 634 | |
| 635 | /* The in-place operators are defined to fall back to the 'normal', |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 636 | non in-place operations, if the in-place methods are not in place. |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 637 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 638 | - If the left hand object has the appropriate struct members, and |
| 639 | they are filled, call the appropriate function and return the |
| 640 | result. No coercion is done on the arguments; the left-hand object |
| 641 | is the one the operation is performed on, and it's up to the |
| 642 | function to deal with the right-hand object. |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 643 | |
| 644 | - Otherwise, in-place modification is not supported. Handle it exactly as |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 645 | a non in-place operation of the same kind. |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 646 | |
| 647 | */ |
| 648 | |
| 649 | #define HASINPLACE(t) PyType_HasFeature((t)->ob_type, Py_TPFLAGS_HAVE_INPLACEOPS) |
| 650 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 651 | static PyObject * |
| 652 | binary_iop(PyObject *v, PyObject *w, const int iop_slot, const int op_slot, |
| 653 | const char *op_name) |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 654 | { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 655 | PyNumberMethods *mv = v->ob_type->tp_as_number; |
| 656 | if (mv != NULL && HASINPLACE(v)) { |
| 657 | binaryfunc *slot = NB_BINOP(mv, iop_slot); |
| 658 | if (*slot) { |
| 659 | PyObject *x = (*slot)(v, w); |
| 660 | if (x != Py_NotImplemented) { |
| 661 | return x; |
| 662 | } |
| 663 | Py_DECREF(x); |
| 664 | } |
Thomas Wouters | f2b332d | 2000-09-02 08:34:40 +0000 | [diff] [blame] | 665 | } |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 666 | return binary_op(v, w, op_slot, op_name); |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 667 | } |
| 668 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 669 | #define INPLACE_BINOP(func, iop, op, op_name) \ |
| 670 | PyObject * \ |
| 671 | func(PyObject *v, PyObject *w) { \ |
| 672 | return binary_iop(v, w, NB_SLOT(iop), NB_SLOT(op), op_name); \ |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 673 | } |
| 674 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 675 | INPLACE_BINOP(PyNumber_InPlaceOr, nb_inplace_or, nb_or, "|=") |
| 676 | INPLACE_BINOP(PyNumber_InPlaceXor, nb_inplace_xor, nb_xor, "^=") |
| 677 | INPLACE_BINOP(PyNumber_InPlaceAnd, nb_inplace_and, nb_and, "&=") |
| 678 | INPLACE_BINOP(PyNumber_InPlaceLshift, nb_inplace_lshift, nb_lshift, "<<=") |
| 679 | INPLACE_BINOP(PyNumber_InPlaceRshift, nb_inplace_rshift, nb_rshift, ">>=") |
| 680 | INPLACE_BINOP(PyNumber_InPlaceSubtract, nb_inplace_subtract, nb_subtract, "-=") |
| 681 | INPLACE_BINOP(PyNumber_InPlaceDivide, nb_inplace_divide, nb_divide, "/=") |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 682 | |
| 683 | PyObject * |
Guido van Rossum | 4668b00 | 2001-08-08 05:00:18 +0000 | [diff] [blame] | 684 | PyNumber_InPlaceFloorDivide(PyObject *v, PyObject *w) |
| 685 | { |
| 686 | /* XXX tp_flags test */ |
| 687 | return binary_iop(v, w, NB_SLOT(nb_inplace_floor_divide), |
| 688 | NB_SLOT(nb_floor_divide), "//="); |
| 689 | } |
| 690 | |
| 691 | PyObject * |
| 692 | PyNumber_InPlaceTrueDivide(PyObject *v, PyObject *w) |
| 693 | { |
| 694 | /* XXX tp_flags test */ |
| 695 | return binary_iop(v, w, NB_SLOT(nb_inplace_true_divide), |
| 696 | NB_SLOT(nb_true_divide), "/="); |
| 697 | } |
| 698 | |
| 699 | PyObject * |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 700 | PyNumber_InPlaceAdd(PyObject *v, PyObject *w) |
| 701 | { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 702 | binaryfunc f = NULL; |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 703 | |
Guido van Rossum | bb8be93 | 2000-09-01 23:27:32 +0000 | [diff] [blame] | 704 | if (v->ob_type->tp_as_sequence != NULL) { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 705 | if (HASINPLACE(v)) |
| 706 | f = v->ob_type->tp_as_sequence->sq_inplace_concat; |
| 707 | if (f == NULL) |
| 708 | f = v->ob_type->tp_as_sequence->sq_concat; |
Guido van Rossum | bb8be93 | 2000-09-01 23:27:32 +0000 | [diff] [blame] | 709 | if (f != NULL) |
| 710 | return (*f)(v, w); |
| 711 | } |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 712 | return binary_iop(v, w, NB_SLOT(nb_inplace_add), NB_SLOT(nb_add), "+="); |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 713 | } |
| 714 | |
| 715 | PyObject * |
| 716 | PyNumber_InPlaceMultiply(PyObject *v, PyObject *w) |
| 717 | { |
Thomas Wouters | f2b332d | 2000-09-02 08:34:40 +0000 | [diff] [blame] | 718 | PyObject * (*g)(PyObject *, int) = NULL; |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 719 | if (HASINPLACE(v) && v->ob_type->tp_as_sequence && |
| 720 | (g = v->ob_type->tp_as_sequence->sq_inplace_repeat)) { |
| 721 | long n; |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 722 | if (PyInt_Check(w)) { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 723 | n = PyInt_AsLong(w); |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 724 | } |
| 725 | else if (PyLong_Check(w)) { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 726 | n = PyLong_AsLong(w); |
| 727 | if (n == -1 && PyErr_Occurred()) |
| 728 | return NULL; |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 729 | } |
| 730 | else { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 731 | return type_error("can't multiply sequence to non-int"); |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 732 | } |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 733 | return (*g)(v, (int)n); |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 734 | } |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 735 | return binary_iop(v, w, NB_SLOT(nb_inplace_multiply), |
| 736 | NB_SLOT(nb_multiply), "*="); |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 737 | } |
| 738 | |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 739 | |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 740 | |
| 741 | PyObject * |
| 742 | PyNumber_InPlaceRemainder(PyObject *v, PyObject *w) |
| 743 | { |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 744 | if (PyString_Check(v)) |
| 745 | return PyString_Format(v, w); |
Martin v. Löwis | 339d0f7 | 2001-08-17 18:39:25 +0000 | [diff] [blame] | 746 | #ifdef Py_USING_UNICODE |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 747 | else if (PyUnicode_Check(v)) |
| 748 | return PyUnicode_Format(v, w); |
Martin v. Löwis | 339d0f7 | 2001-08-17 18:39:25 +0000 | [diff] [blame] | 749 | #endif |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 750 | else |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 751 | return binary_iop(v, w, NB_SLOT(nb_inplace_remainder), |
| 752 | NB_SLOT(nb_remainder), "%="); |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 753 | } |
| 754 | |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 755 | |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 756 | PyObject * |
| 757 | PyNumber_InPlacePower(PyObject *v, PyObject *w, PyObject *z) |
| 758 | { |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 759 | if (HASINPLACE(v) && v->ob_type->tp_as_number && |
| 760 | v->ob_type->tp_as_number->nb_inplace_power != NULL) { |
| 761 | return ternary_op(v, w, z, NB_SLOT(nb_inplace_power), "**="); |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 762 | } |
Neil Schemenauer | 5a1f015 | 2001-01-04 01:39:06 +0000 | [diff] [blame] | 763 | else { |
| 764 | return ternary_op(v, w, z, NB_SLOT(nb_power), "**="); |
| 765 | } |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 766 | } |
| 767 | |
| 768 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 769 | /* Unary operators and functions */ |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 770 | |
| 771 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 772 | PyNumber_Negative(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 773 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 774 | PyNumberMethods *m; |
| 775 | |
| 776 | if (o == NULL) |
| 777 | return null_error(); |
| 778 | m = o->ob_type->tp_as_number; |
| 779 | if (m && m->nb_negative) |
| 780 | return (*m->nb_negative)(o); |
| 781 | |
| 782 | return type_error("bad operand type for unary -"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 783 | } |
| 784 | |
| 785 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 786 | PyNumber_Positive(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 787 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 788 | PyNumberMethods *m; |
| 789 | |
| 790 | if (o == NULL) |
| 791 | return null_error(); |
| 792 | m = o->ob_type->tp_as_number; |
| 793 | if (m && m->nb_positive) |
| 794 | return (*m->nb_positive)(o); |
| 795 | |
| 796 | return type_error("bad operand type for unary +"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 797 | } |
| 798 | |
| 799 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 800 | PyNumber_Invert(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 801 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 802 | PyNumberMethods *m; |
| 803 | |
| 804 | if (o == NULL) |
| 805 | return null_error(); |
| 806 | m = o->ob_type->tp_as_number; |
| 807 | if (m && m->nb_invert) |
| 808 | return (*m->nb_invert)(o); |
| 809 | |
| 810 | return type_error("bad operand type for unary ~"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 811 | } |
| 812 | |
| 813 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 814 | PyNumber_Absolute(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 815 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 816 | PyNumberMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 817 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 818 | if (o == NULL) |
| 819 | return null_error(); |
| 820 | m = o->ob_type->tp_as_number; |
| 821 | if (m && m->nb_absolute) |
| 822 | return m->nb_absolute(o); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 823 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 824 | return type_error("bad operand type for abs()"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 825 | } |
| 826 | |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 827 | /* Add a check for embedded NULL-bytes in the argument. */ |
| 828 | static PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 829 | int_from_string(const char *s, int len) |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 830 | { |
| 831 | char *end; |
| 832 | PyObject *x; |
| 833 | |
| 834 | x = PyInt_FromString((char*)s, &end, 10); |
| 835 | if (x == NULL) |
| 836 | return NULL; |
| 837 | if (end != s + len) { |
| 838 | PyErr_SetString(PyExc_ValueError, |
| 839 | "null byte in argument for int()"); |
| 840 | Py_DECREF(x); |
| 841 | return NULL; |
| 842 | } |
| 843 | return x; |
| 844 | } |
| 845 | |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 846 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 847 | PyNumber_Int(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 848 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 849 | PyNumberMethods *m; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 850 | const char *buffer; |
| 851 | int buffer_len; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 852 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 853 | if (o == NULL) |
| 854 | return null_error(); |
Tim Peters | 64b5ce3 | 2001-09-10 20:52:51 +0000 | [diff] [blame] | 855 | if (PyInt_CheckExact(o)) { |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 856 | Py_INCREF(o); |
| 857 | return o; |
| 858 | } |
Tim Peters | 64b5ce3 | 2001-09-10 20:52:51 +0000 | [diff] [blame] | 859 | if (PyInt_Check(o)) { |
| 860 | PyIntObject *io = (PyIntObject*)o; |
| 861 | return PyInt_FromLong(io->ob_ival); |
| 862 | } |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 863 | if (PyString_Check(o)) |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 864 | return int_from_string(PyString_AS_STRING(o), |
| 865 | PyString_GET_SIZE(o)); |
Martin v. Löwis | 339d0f7 | 2001-08-17 18:39:25 +0000 | [diff] [blame] | 866 | #ifdef Py_USING_UNICODE |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 867 | if (PyUnicode_Check(o)) |
| 868 | return PyInt_FromUnicode(PyUnicode_AS_UNICODE(o), |
| 869 | PyUnicode_GET_SIZE(o), |
| 870 | 10); |
Martin v. Löwis | 339d0f7 | 2001-08-17 18:39:25 +0000 | [diff] [blame] | 871 | #endif |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 872 | m = o->ob_type->tp_as_number; |
| 873 | if (m && m->nb_int) |
| 874 | return m->nb_int(o); |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 875 | if (!PyObject_AsCharBuffer(o, &buffer, &buffer_len)) |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 876 | return int_from_string((char*)buffer, buffer_len); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 877 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 878 | return type_error("object can't be converted to int"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 879 | } |
| 880 | |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 881 | /* Add a check for embedded NULL-bytes in the argument. */ |
Barry Warsaw | 226ae6c | 1999-10-12 19:54:53 +0000 | [diff] [blame] | 882 | static PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 883 | long_from_string(const char *s, int len) |
Barry Warsaw | 226ae6c | 1999-10-12 19:54:53 +0000 | [diff] [blame] | 884 | { |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 885 | char *end; |
Barry Warsaw | 226ae6c | 1999-10-12 19:54:53 +0000 | [diff] [blame] | 886 | PyObject *x; |
Barry Warsaw | 226ae6c | 1999-10-12 19:54:53 +0000 | [diff] [blame] | 887 | |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 888 | x = PyLong_FromString((char*)s, &end, 10); |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 889 | if (x == NULL) |
Barry Warsaw | 226ae6c | 1999-10-12 19:54:53 +0000 | [diff] [blame] | 890 | return NULL; |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 891 | if (end != s + len) { |
Barry Warsaw | 226ae6c | 1999-10-12 19:54:53 +0000 | [diff] [blame] | 892 | PyErr_SetString(PyExc_ValueError, |
| 893 | "null byte in argument for long()"); |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 894 | Py_DECREF(x); |
Barry Warsaw | 226ae6c | 1999-10-12 19:54:53 +0000 | [diff] [blame] | 895 | return NULL; |
| 896 | } |
| 897 | return x; |
| 898 | } |
| 899 | |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 900 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 901 | PyNumber_Long(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 902 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 903 | PyNumberMethods *m; |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 904 | const char *buffer; |
| 905 | int buffer_len; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 906 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 907 | if (o == NULL) |
| 908 | return null_error(); |
Tim Peters | 64b5ce3 | 2001-09-10 20:52:51 +0000 | [diff] [blame] | 909 | if (PyLong_CheckExact(o)) { |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 910 | Py_INCREF(o); |
| 911 | return o; |
| 912 | } |
Tim Peters | 64b5ce3 | 2001-09-10 20:52:51 +0000 | [diff] [blame] | 913 | if (PyLong_Check(o)) |
| 914 | return _PyLong_Copy((PyLongObject *)o); |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 915 | if (PyString_Check(o)) |
Barry Warsaw | 226ae6c | 1999-10-12 19:54:53 +0000 | [diff] [blame] | 916 | /* need to do extra error checking that PyLong_FromString() |
| 917 | * doesn't do. In particular long('9.5') must raise an |
| 918 | * exception, not truncate the float. |
| 919 | */ |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 920 | return long_from_string(PyString_AS_STRING(o), |
| 921 | PyString_GET_SIZE(o)); |
Martin v. Löwis | 339d0f7 | 2001-08-17 18:39:25 +0000 | [diff] [blame] | 922 | #ifdef Py_USING_UNICODE |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 923 | if (PyUnicode_Check(o)) |
| 924 | /* The above check is done in PyLong_FromUnicode(). */ |
| 925 | return PyLong_FromUnicode(PyUnicode_AS_UNICODE(o), |
| 926 | PyUnicode_GET_SIZE(o), |
| 927 | 10); |
Martin v. Löwis | 339d0f7 | 2001-08-17 18:39:25 +0000 | [diff] [blame] | 928 | #endif |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 929 | m = o->ob_type->tp_as_number; |
| 930 | if (m && m->nb_long) |
| 931 | return m->nb_long(o); |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 932 | if (!PyObject_AsCharBuffer(o, &buffer, &buffer_len)) |
| 933 | return long_from_string(buffer, buffer_len); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 934 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 935 | return type_error("object can't be converted to long"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 936 | } |
| 937 | |
| 938 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 939 | PyNumber_Float(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 940 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 941 | PyNumberMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 942 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 943 | if (o == NULL) |
| 944 | return null_error(); |
Tim Peters | 7a50f25 | 2001-09-10 21:28:20 +0000 | [diff] [blame] | 945 | if (PyFloat_CheckExact(o)) { |
Guido van Rossum | 9e896b3 | 2000-04-05 20:11:21 +0000 | [diff] [blame] | 946 | Py_INCREF(o); |
| 947 | return o; |
| 948 | } |
Tim Peters | 7a50f25 | 2001-09-10 21:28:20 +0000 | [diff] [blame] | 949 | if (PyFloat_Check(o)) { |
| 950 | PyFloatObject *po = (PyFloatObject *)o; |
| 951 | return PyFloat_FromDouble(po->ob_fval); |
| 952 | } |
Guido van Rossum | 4c08d55 | 2000-03-10 22:55:18 +0000 | [diff] [blame] | 953 | if (!PyString_Check(o)) { |
| 954 | m = o->ob_type->tp_as_number; |
| 955 | if (m && m->nb_float) |
| 956 | return m->nb_float(o); |
| 957 | } |
| 958 | return PyFloat_FromString(o, NULL); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 959 | } |
| 960 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 961 | /* Operations on sequences */ |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 962 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 963 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 964 | PySequence_Check(PyObject *s) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 965 | { |
Guido van Rossum | 8700b42 | 2001-09-07 20:20:11 +0000 | [diff] [blame] | 966 | return s != NULL && s->ob_type->tp_as_sequence && |
| 967 | s->ob_type->tp_as_sequence->sq_item != NULL; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 968 | } |
| 969 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 970 | int |
Jeremy Hylton | 6253f83 | 2000-07-12 12:56:19 +0000 | [diff] [blame] | 971 | PySequence_Size(PyObject *s) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 972 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 973 | PySequenceMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 974 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 975 | if (s == NULL) { |
| 976 | null_error(); |
| 977 | return -1; |
| 978 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 979 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 980 | m = s->ob_type->tp_as_sequence; |
| 981 | if (m && m->sq_length) |
| 982 | return m->sq_length(s); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 983 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 984 | type_error("len() of unsized object"); |
| 985 | return -1; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 986 | } |
| 987 | |
Marc-André Lemburg | cf5f358 | 2000-07-17 09:22:55 +0000 | [diff] [blame] | 988 | #undef PySequence_Length |
| 989 | int |
| 990 | PySequence_Length(PyObject *s) |
| 991 | { |
| 992 | return PySequence_Size(s); |
| 993 | } |
| 994 | #define PySequence_Length PySequence_Size |
| 995 | |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 996 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 997 | PySequence_Concat(PyObject *s, PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 998 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 999 | PySequenceMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1000 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1001 | if (s == NULL || o == NULL) |
| 1002 | return null_error(); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1003 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1004 | m = s->ob_type->tp_as_sequence; |
| 1005 | if (m && m->sq_concat) |
| 1006 | return m->sq_concat(s, o); |
| 1007 | |
| 1008 | return type_error("object can't be concatenated"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1009 | } |
| 1010 | |
| 1011 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1012 | PySequence_Repeat(PyObject *o, int count) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1013 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1014 | PySequenceMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1015 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1016 | if (o == NULL) |
| 1017 | return null_error(); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1018 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1019 | m = o->ob_type->tp_as_sequence; |
| 1020 | if (m && m->sq_repeat) |
| 1021 | return m->sq_repeat(o, count); |
| 1022 | |
| 1023 | return type_error("object can't be repeated"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1024 | } |
| 1025 | |
| 1026 | PyObject * |
Thomas Wouters | e289e0b | 2000-08-24 20:08:19 +0000 | [diff] [blame] | 1027 | PySequence_InPlaceConcat(PyObject *s, PyObject *o) |
| 1028 | { |
| 1029 | PySequenceMethods *m; |
| 1030 | |
| 1031 | if (s == NULL || o == NULL) |
| 1032 | return null_error(); |
| 1033 | |
| 1034 | m = s->ob_type->tp_as_sequence; |
| 1035 | if (m && HASINPLACE(s) && m->sq_inplace_concat) |
| 1036 | return m->sq_inplace_concat(s, o); |
| 1037 | if (m && m->sq_concat) |
| 1038 | return m->sq_concat(s, o); |
| 1039 | |
| 1040 | return type_error("object can't be concatenated"); |
| 1041 | } |
| 1042 | |
| 1043 | PyObject * |
| 1044 | PySequence_InPlaceRepeat(PyObject *o, int count) |
| 1045 | { |
| 1046 | PySequenceMethods *m; |
| 1047 | |
| 1048 | if (o == NULL) |
| 1049 | return null_error(); |
| 1050 | |
| 1051 | m = o->ob_type->tp_as_sequence; |
| 1052 | if (m && HASINPLACE(o) && m->sq_inplace_repeat) |
| 1053 | return m->sq_inplace_repeat(o, count); |
| 1054 | if (m && m->sq_repeat) |
| 1055 | return m->sq_repeat(o, count); |
| 1056 | |
| 1057 | return type_error("object can't be repeated"); |
| 1058 | } |
| 1059 | |
| 1060 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1061 | PySequence_GetItem(PyObject *s, int i) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1062 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1063 | PySequenceMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1064 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1065 | if (s == NULL) |
| 1066 | return null_error(); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1067 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1068 | m = s->ob_type->tp_as_sequence; |
| 1069 | if (m && m->sq_item) { |
| 1070 | if (i < 0) { |
| 1071 | if (m->sq_length) { |
| 1072 | int l = (*m->sq_length)(s); |
| 1073 | if (l < 0) |
| 1074 | return NULL; |
| 1075 | i += l; |
| 1076 | } |
| 1077 | } |
| 1078 | return m->sq_item(s, i); |
| 1079 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1080 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1081 | return type_error("unindexable object"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1082 | } |
| 1083 | |
Thomas Wouters | 1d75a79 | 2000-08-17 22:37:32 +0000 | [diff] [blame] | 1084 | static PyObject * |
| 1085 | sliceobj_from_intint(int i, int j) |
| 1086 | { |
| 1087 | PyObject *start, *end, *slice; |
| 1088 | start = PyInt_FromLong((long)i); |
| 1089 | if (!start) |
| 1090 | return NULL; |
| 1091 | end = PyInt_FromLong((long)j); |
| 1092 | if (!end) { |
| 1093 | Py_DECREF(start); |
| 1094 | return NULL; |
| 1095 | } |
| 1096 | slice = PySlice_New(start, end, NULL); |
| 1097 | Py_DECREF(start); |
| 1098 | Py_DECREF(end); |
| 1099 | return slice; |
| 1100 | } |
| 1101 | |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1102 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1103 | PySequence_GetSlice(PyObject *s, int i1, int i2) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1104 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1105 | PySequenceMethods *m; |
Thomas Wouters | 1d75a79 | 2000-08-17 22:37:32 +0000 | [diff] [blame] | 1106 | PyMappingMethods *mp; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1107 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1108 | if (!s) return null_error(); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1109 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1110 | m = s->ob_type->tp_as_sequence; |
| 1111 | if (m && m->sq_slice) { |
| 1112 | if (i1 < 0 || i2 < 0) { |
| 1113 | if (m->sq_length) { |
| 1114 | int l = (*m->sq_length)(s); |
| 1115 | if (l < 0) |
| 1116 | return NULL; |
| 1117 | if (i1 < 0) |
| 1118 | i1 += l; |
| 1119 | if (i2 < 0) |
| 1120 | i2 += l; |
| 1121 | } |
| 1122 | } |
| 1123 | return m->sq_slice(s, i1, i2); |
Thomas Wouters | 1d75a79 | 2000-08-17 22:37:32 +0000 | [diff] [blame] | 1124 | } else if ((mp = s->ob_type->tp_as_mapping) && mp->mp_subscript) { |
| 1125 | PyObject *res; |
| 1126 | PyObject *slice = sliceobj_from_intint(i1, i2); |
| 1127 | if (!slice) |
| 1128 | return NULL; |
| 1129 | res = mp->mp_subscript(s, slice); |
| 1130 | Py_DECREF(slice); |
| 1131 | return res; |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1132 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1133 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1134 | return type_error("unsliceable object"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1135 | } |
| 1136 | |
| 1137 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1138 | PySequence_SetItem(PyObject *s, int i, PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1139 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1140 | PySequenceMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1141 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1142 | if (s == NULL) { |
| 1143 | null_error(); |
| 1144 | return -1; |
| 1145 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1146 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1147 | m = s->ob_type->tp_as_sequence; |
| 1148 | if (m && m->sq_ass_item) { |
| 1149 | if (i < 0) { |
| 1150 | if (m->sq_length) { |
| 1151 | int l = (*m->sq_length)(s); |
| 1152 | if (l < 0) |
Guido van Rossum | ed6219b | 1998-05-29 02:59:33 +0000 | [diff] [blame] | 1153 | return -1; |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1154 | i += l; |
| 1155 | } |
| 1156 | } |
| 1157 | return m->sq_ass_item(s, i, o); |
| 1158 | } |
| 1159 | |
| 1160 | type_error("object doesn't support item assignment"); |
| 1161 | return -1; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1162 | } |
| 1163 | |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 1164 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1165 | PySequence_DelItem(PyObject *s, int i) |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 1166 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1167 | PySequenceMethods *m; |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 1168 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1169 | if (s == NULL) { |
| 1170 | null_error(); |
| 1171 | return -1; |
| 1172 | } |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 1173 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1174 | m = s->ob_type->tp_as_sequence; |
| 1175 | if (m && m->sq_ass_item) { |
| 1176 | if (i < 0) { |
| 1177 | if (m->sq_length) { |
| 1178 | int l = (*m->sq_length)(s); |
| 1179 | if (l < 0) |
Guido van Rossum | ed6219b | 1998-05-29 02:59:33 +0000 | [diff] [blame] | 1180 | return -1; |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1181 | i += l; |
| 1182 | } |
| 1183 | } |
| 1184 | return m->sq_ass_item(s, i, (PyObject *)NULL); |
| 1185 | } |
| 1186 | |
| 1187 | type_error("object doesn't support item deletion"); |
| 1188 | return -1; |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 1189 | } |
| 1190 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1191 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1192 | PySequence_SetSlice(PyObject *s, int i1, int i2, PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1193 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1194 | PySequenceMethods *m; |
Thomas Wouters | 1d75a79 | 2000-08-17 22:37:32 +0000 | [diff] [blame] | 1195 | PyMappingMethods *mp; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1196 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1197 | if (s == NULL) { |
| 1198 | null_error(); |
| 1199 | return -1; |
| 1200 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1201 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1202 | m = s->ob_type->tp_as_sequence; |
| 1203 | if (m && m->sq_ass_slice) { |
| 1204 | if (i1 < 0 || i2 < 0) { |
| 1205 | if (m->sq_length) { |
| 1206 | int l = (*m->sq_length)(s); |
| 1207 | if (l < 0) |
Guido van Rossum | ed6219b | 1998-05-29 02:59:33 +0000 | [diff] [blame] | 1208 | return -1; |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1209 | if (i1 < 0) |
| 1210 | i1 += l; |
| 1211 | if (i2 < 0) |
| 1212 | i2 += l; |
| 1213 | } |
| 1214 | } |
| 1215 | return m->sq_ass_slice(s, i1, i2, o); |
Thomas Wouters | 1d75a79 | 2000-08-17 22:37:32 +0000 | [diff] [blame] | 1216 | } else if ((mp = s->ob_type->tp_as_mapping) && mp->mp_ass_subscript) { |
| 1217 | int res; |
| 1218 | PyObject *slice = sliceobj_from_intint(i1, i2); |
| 1219 | if (!slice) |
| 1220 | return -1; |
| 1221 | res = mp->mp_ass_subscript(s, slice, o); |
| 1222 | Py_DECREF(slice); |
| 1223 | return res; |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1224 | } |
Thomas Wouters | 1d75a79 | 2000-08-17 22:37:32 +0000 | [diff] [blame] | 1225 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1226 | type_error("object doesn't support slice assignment"); |
| 1227 | return -1; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1228 | } |
| 1229 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1230 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1231 | PySequence_DelSlice(PyObject *s, int i1, int i2) |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 1232 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1233 | PySequenceMethods *m; |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 1234 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1235 | if (s == NULL) { |
| 1236 | null_error(); |
| 1237 | return -1; |
| 1238 | } |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 1239 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1240 | m = s->ob_type->tp_as_sequence; |
| 1241 | if (m && m->sq_ass_slice) { |
| 1242 | if (i1 < 0 || i2 < 0) { |
| 1243 | if (m->sq_length) { |
| 1244 | int l = (*m->sq_length)(s); |
| 1245 | if (l < 0) |
Guido van Rossum | ed6219b | 1998-05-29 02:59:33 +0000 | [diff] [blame] | 1246 | return -1; |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1247 | if (i1 < 0) |
| 1248 | i1 += l; |
| 1249 | if (i2 < 0) |
| 1250 | i2 += l; |
| 1251 | } |
| 1252 | } |
| 1253 | return m->sq_ass_slice(s, i1, i2, (PyObject *)NULL); |
| 1254 | } |
| 1255 | type_error("object doesn't support slice deletion"); |
| 1256 | return -1; |
Guido van Rossum | 6cdc6f4 | 1996-08-21 17:41:54 +0000 | [diff] [blame] | 1257 | } |
| 1258 | |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1259 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1260 | PySequence_Tuple(PyObject *v) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1261 | { |
Tim Peters | 6912d4d | 2001-05-05 03:56:37 +0000 | [diff] [blame] | 1262 | PyObject *it; /* iter(v) */ |
| 1263 | int n; /* guess for result tuple size */ |
| 1264 | PyObject *result; |
| 1265 | int j; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1266 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1267 | if (v == NULL) |
| 1268 | return null_error(); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1269 | |
Tim Peters | 6912d4d | 2001-05-05 03:56:37 +0000 | [diff] [blame] | 1270 | /* Special-case the common tuple and list cases, for efficiency. */ |
Tim Peters | 4c3a0a3 | 2001-09-10 23:37:46 +0000 | [diff] [blame] | 1271 | if (PyTuple_CheckExact(v)) { |
| 1272 | /* Note that we can't know whether it's safe to return |
| 1273 | a tuple *subclass* instance as-is, hence the restriction |
Tim Peters | 8ff70a9 | 2001-09-10 23:53:53 +0000 | [diff] [blame] | 1274 | to exact tuples here. In contrast, lists always make |
| 1275 | a copy, so there's no need for exactness below. */ |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1276 | Py_INCREF(v); |
| 1277 | return v; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1278 | } |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1279 | if (PyList_Check(v)) |
| 1280 | return PyList_AsTuple(v); |
| 1281 | |
Tim Peters | 6912d4d | 2001-05-05 03:56:37 +0000 | [diff] [blame] | 1282 | /* Get iterator. */ |
| 1283 | it = PyObject_GetIter(v); |
| 1284 | if (it == NULL) |
Tim Peters | 1fc240e | 2001-10-26 05:06:50 +0000 | [diff] [blame] | 1285 | return NULL; |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1286 | |
Tim Peters | 6912d4d | 2001-05-05 03:56:37 +0000 | [diff] [blame] | 1287 | /* Guess result size and allocate space. */ |
| 1288 | n = PySequence_Size(v); |
| 1289 | if (n < 0) { |
| 1290 | PyErr_Clear(); |
| 1291 | n = 10; /* arbitrary */ |
| 1292 | } |
| 1293 | result = PyTuple_New(n); |
| 1294 | if (result == NULL) |
| 1295 | goto Fail; |
| 1296 | |
| 1297 | /* Fill the tuple. */ |
| 1298 | for (j = 0; ; ++j) { |
| 1299 | PyObject *item = PyIter_Next(it); |
| 1300 | if (item == NULL) { |
| 1301 | if (PyErr_Occurred()) |
| 1302 | goto Fail; |
| 1303 | break; |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1304 | } |
Tim Peters | 6912d4d | 2001-05-05 03:56:37 +0000 | [diff] [blame] | 1305 | if (j >= n) { |
| 1306 | if (n < 500) |
| 1307 | n += 10; |
| 1308 | else |
| 1309 | n += 100; |
Tim Peters | 4324aa3 | 2001-05-28 22:30:08 +0000 | [diff] [blame] | 1310 | if (_PyTuple_Resize(&result, n) != 0) { |
Tim Peters | 12d0a6c | 2001-05-05 04:10:25 +0000 | [diff] [blame] | 1311 | Py_DECREF(item); |
Tim Peters | 6912d4d | 2001-05-05 03:56:37 +0000 | [diff] [blame] | 1312 | goto Fail; |
Tim Peters | 12d0a6c | 2001-05-05 04:10:25 +0000 | [diff] [blame] | 1313 | } |
Tim Peters | 6912d4d | 2001-05-05 03:56:37 +0000 | [diff] [blame] | 1314 | } |
| 1315 | PyTuple_SET_ITEM(result, j, item); |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1316 | } |
| 1317 | |
Tim Peters | 6912d4d | 2001-05-05 03:56:37 +0000 | [diff] [blame] | 1318 | /* Cut tuple back if guess was too large. */ |
| 1319 | if (j < n && |
Tim Peters | 4324aa3 | 2001-05-28 22:30:08 +0000 | [diff] [blame] | 1320 | _PyTuple_Resize(&result, j) != 0) |
Tim Peters | 6912d4d | 2001-05-05 03:56:37 +0000 | [diff] [blame] | 1321 | goto Fail; |
| 1322 | |
| 1323 | Py_DECREF(it); |
| 1324 | return result; |
| 1325 | |
| 1326 | Fail: |
| 1327 | Py_XDECREF(result); |
| 1328 | Py_DECREF(it); |
| 1329 | return NULL; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1330 | } |
| 1331 | |
Guido van Rossum | 3c5936a | 1996-12-05 21:51:24 +0000 | [diff] [blame] | 1332 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1333 | PySequence_List(PyObject *v) |
Guido van Rossum | 3c5936a | 1996-12-05 21:51:24 +0000 | [diff] [blame] | 1334 | { |
Tim Peters | f553f89 | 2001-05-01 20:45:31 +0000 | [diff] [blame] | 1335 | PyObject *it; /* iter(v) */ |
| 1336 | PyObject *result; /* result list */ |
| 1337 | int n; /* guess for result list size */ |
| 1338 | int i; |
Guido van Rossum | 4669fb4 | 1997-04-02 05:31:09 +0000 | [diff] [blame] | 1339 | |
Guido van Rossum | 5dba9e8 | 1998-07-10 18:03:50 +0000 | [diff] [blame] | 1340 | if (v == NULL) |
| 1341 | return null_error(); |
| 1342 | |
Tim Peters | f553f89 | 2001-05-01 20:45:31 +0000 | [diff] [blame] | 1343 | /* Special-case list(a_list), for speed. */ |
Guido van Rossum | 5dba9e8 | 1998-07-10 18:03:50 +0000 | [diff] [blame] | 1344 | if (PyList_Check(v)) |
| 1345 | return PyList_GetSlice(v, 0, PyList_GET_SIZE(v)); |
| 1346 | |
Tim Peters | f553f89 | 2001-05-01 20:45:31 +0000 | [diff] [blame] | 1347 | /* Get iterator. There may be some low-level efficiency to be gained |
| 1348 | * by caching the tp_iternext slot instead of using PyIter_Next() |
| 1349 | * later, but premature optimization is the root etc. |
| 1350 | */ |
| 1351 | it = PyObject_GetIter(v); |
| 1352 | if (it == NULL) |
| 1353 | return NULL; |
| 1354 | |
| 1355 | /* Guess a result list size. */ |
| 1356 | n = -1; /* unknown */ |
| 1357 | if (PySequence_Check(v) && |
| 1358 | v->ob_type->tp_as_sequence->sq_length) { |
| 1359 | n = PySequence_Size(v); |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1360 | if (n < 0) |
Tim Peters | f553f89 | 2001-05-01 20:45:31 +0000 | [diff] [blame] | 1361 | PyErr_Clear(); |
| 1362 | } |
| 1363 | if (n < 0) |
| 1364 | n = 8; /* arbitrary */ |
| 1365 | result = PyList_New(n); |
| 1366 | if (result == NULL) { |
| 1367 | Py_DECREF(it); |
| 1368 | return NULL; |
| 1369 | } |
| 1370 | |
| 1371 | /* Run iterator to exhaustion. */ |
| 1372 | for (i = 0; ; i++) { |
| 1373 | PyObject *item = PyIter_Next(it); |
| 1374 | if (item == NULL) { |
Tim Peters | f553f89 | 2001-05-01 20:45:31 +0000 | [diff] [blame] | 1375 | if (PyErr_Occurred()) { |
Tim Peters | f4848da | 2001-05-05 00:14:56 +0000 | [diff] [blame] | 1376 | Py_DECREF(result); |
| 1377 | result = NULL; |
Guido van Rossum | bfc725b | 1998-07-10 16:22:44 +0000 | [diff] [blame] | 1378 | } |
Tim Peters | f553f89 | 2001-05-01 20:45:31 +0000 | [diff] [blame] | 1379 | break; |
Guido van Rossum | bfc725b | 1998-07-10 16:22:44 +0000 | [diff] [blame] | 1380 | } |
Tim Peters | f553f89 | 2001-05-01 20:45:31 +0000 | [diff] [blame] | 1381 | if (i < n) |
Tim Peters | 6ad22c4 | 2001-05-02 07:12:39 +0000 | [diff] [blame] | 1382 | PyList_SET_ITEM(result, i, item); /* steals ref */ |
| 1383 | else { |
| 1384 | int status = PyList_Append(result, item); |
| 1385 | Py_DECREF(item); /* append creates a new ref */ |
| 1386 | if (status < 0) { |
| 1387 | Py_DECREF(result); |
| 1388 | result = NULL; |
| 1389 | break; |
| 1390 | } |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1391 | } |
Guido van Rossum | 4669fb4 | 1997-04-02 05:31:09 +0000 | [diff] [blame] | 1392 | } |
Tim Peters | f553f89 | 2001-05-01 20:45:31 +0000 | [diff] [blame] | 1393 | |
| 1394 | /* Cut back result list if initial guess was too large. */ |
| 1395 | if (i < n && result != NULL) { |
| 1396 | if (PyList_SetSlice(result, i, n, (PyObject *)NULL) != 0) { |
| 1397 | Py_DECREF(result); |
| 1398 | result = NULL; |
| 1399 | } |
| 1400 | } |
| 1401 | Py_DECREF(it); |
| 1402 | return result; |
Guido van Rossum | 3c5936a | 1996-12-05 21:51:24 +0000 | [diff] [blame] | 1403 | } |
| 1404 | |
Andrew M. Kuchling | 74042d6 | 2000-06-18 18:43:14 +0000 | [diff] [blame] | 1405 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1406 | PySequence_Fast(PyObject *v, const char *m) |
Andrew M. Kuchling | 74042d6 | 2000-06-18 18:43:14 +0000 | [diff] [blame] | 1407 | { |
| 1408 | if (v == NULL) |
| 1409 | return null_error(); |
| 1410 | |
| 1411 | if (PyList_Check(v) || PyTuple_Check(v)) { |
| 1412 | Py_INCREF(v); |
| 1413 | return v; |
| 1414 | } |
| 1415 | |
| 1416 | v = PySequence_Tuple(v); |
| 1417 | if (v == NULL && PyErr_ExceptionMatches(PyExc_TypeError)) |
| 1418 | return type_error(m); |
| 1419 | |
| 1420 | return v; |
| 1421 | } |
| 1422 | |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1423 | /* Iterate over seq. Result depends on the operation: |
| 1424 | PY_ITERSEARCH_COUNT: -1 if error, else # of times obj appears in seq. |
| 1425 | PY_ITERSEARCH_INDEX: 0-based index of first occurence of obj in seq; |
| 1426 | set ValueError and return -1 if none found; also return -1 on error. |
| 1427 | Py_ITERSEARCH_CONTAINS: return 1 if obj in seq, else 0; -1 on error. |
| 1428 | */ |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1429 | int |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1430 | _PySequence_IterSearch(PyObject *seq, PyObject *obj, int operation) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1431 | { |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1432 | int n; |
| 1433 | int wrapped; /* for PY_ITERSEARCH_INDEX, true iff n wrapped around */ |
| 1434 | PyObject *it; /* iter(seq) */ |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1435 | |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1436 | if (seq == NULL || obj == NULL) { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1437 | null_error(); |
| 1438 | return -1; |
| 1439 | } |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1440 | |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1441 | it = PyObject_GetIter(seq); |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1442 | if (it == NULL) { |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1443 | type_error("iterable argument required"); |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1444 | return -1; |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1445 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1446 | |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1447 | n = wrapped = 0; |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1448 | for (;;) { |
| 1449 | int cmp; |
| 1450 | PyObject *item = PyIter_Next(it); |
| 1451 | if (item == NULL) { |
| 1452 | if (PyErr_Occurred()) |
| 1453 | goto Fail; |
| 1454 | break; |
| 1455 | } |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1456 | |
| 1457 | cmp = PyObject_RichCompareBool(obj, item, Py_EQ); |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1458 | Py_DECREF(item); |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1459 | if (cmp < 0) |
| 1460 | goto Fail; |
| 1461 | if (cmp > 0) { |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1462 | switch (operation) { |
| 1463 | case PY_ITERSEARCH_COUNT: |
| 1464 | ++n; |
| 1465 | if (n <= 0) { |
| 1466 | PyErr_SetString(PyExc_OverflowError, |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1467 | "count exceeds C int size"); |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1468 | goto Fail; |
| 1469 | } |
| 1470 | break; |
| 1471 | |
| 1472 | case PY_ITERSEARCH_INDEX: |
| 1473 | if (wrapped) { |
| 1474 | PyErr_SetString(PyExc_OverflowError, |
| 1475 | "index exceeds C int size"); |
| 1476 | goto Fail; |
| 1477 | } |
| 1478 | goto Done; |
| 1479 | |
| 1480 | case PY_ITERSEARCH_CONTAINS: |
| 1481 | n = 1; |
| 1482 | goto Done; |
| 1483 | |
| 1484 | default: |
| 1485 | assert(!"unknown operation"); |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1486 | } |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1487 | } |
| 1488 | |
| 1489 | if (operation == PY_ITERSEARCH_INDEX) { |
| 1490 | ++n; |
| 1491 | if (n <= 0) |
| 1492 | wrapped = 1; |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1493 | } |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1494 | } |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1495 | |
| 1496 | if (operation != PY_ITERSEARCH_INDEX) |
| 1497 | goto Done; |
| 1498 | |
| 1499 | PyErr_SetString(PyExc_ValueError, |
| 1500 | "sequence.index(x): x not in sequence"); |
| 1501 | /* fall into failure code */ |
| 1502 | Fail: |
| 1503 | n = -1; |
| 1504 | /* fall through */ |
| 1505 | Done: |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1506 | Py_DECREF(it); |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1507 | return n; |
Tim Peters | 75f8e35 | 2001-05-05 11:33:43 +0000 | [diff] [blame] | 1508 | |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1509 | } |
| 1510 | |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1511 | /* Return # of times o appears in s. */ |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1512 | int |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1513 | PySequence_Count(PyObject *s, PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1514 | { |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1515 | return _PySequence_IterSearch(s, o, PY_ITERSEARCH_COUNT); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1516 | } |
| 1517 | |
Tim Peters | cb8d368 | 2001-05-05 21:05:01 +0000 | [diff] [blame] | 1518 | /* Return -1 if error; 1 if ob in seq; 0 if ob not in seq. |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1519 | * Use sq_contains if possible, else defer to _PySequence_IterSearch(). |
Tim Peters | cb8d368 | 2001-05-05 21:05:01 +0000 | [diff] [blame] | 1520 | */ |
| 1521 | int |
| 1522 | PySequence_Contains(PyObject *seq, PyObject *ob) |
| 1523 | { |
| 1524 | if (PyType_HasFeature(seq->ob_type, Py_TPFLAGS_HAVE_SEQUENCE_IN)) { |
| 1525 | PySequenceMethods *sqm = seq->ob_type->tp_as_sequence; |
| 1526 | if (sqm != NULL && sqm->sq_contains != NULL) |
| 1527 | return (*sqm->sq_contains)(seq, ob); |
| 1528 | } |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1529 | return _PySequence_IterSearch(seq, ob, PY_ITERSEARCH_CONTAINS); |
Tim Peters | cb8d368 | 2001-05-05 21:05:01 +0000 | [diff] [blame] | 1530 | } |
| 1531 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1532 | /* Backwards compatibility */ |
| 1533 | #undef PySequence_In |
| 1534 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1535 | PySequence_In(PyObject *w, PyObject *v) |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1536 | { |
| 1537 | return PySequence_Contains(w, v); |
| 1538 | } |
| 1539 | |
| 1540 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1541 | PySequence_Index(PyObject *s, PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1542 | { |
Tim Peters | 16a77ad | 2001-09-08 04:00:12 +0000 | [diff] [blame] | 1543 | return _PySequence_IterSearch(s, o, PY_ITERSEARCH_INDEX); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1544 | } |
| 1545 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1546 | /* Operations on mappings */ |
| 1547 | |
| 1548 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1549 | PyMapping_Check(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1550 | { |
Guido van Rossum | 8700b42 | 2001-09-07 20:20:11 +0000 | [diff] [blame] | 1551 | return o && o->ob_type->tp_as_mapping && |
| 1552 | o->ob_type->tp_as_mapping->mp_subscript; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1553 | } |
| 1554 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1555 | int |
Jeremy Hylton | 6253f83 | 2000-07-12 12:56:19 +0000 | [diff] [blame] | 1556 | PyMapping_Size(PyObject *o) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1557 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1558 | PyMappingMethods *m; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1559 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1560 | if (o == NULL) { |
| 1561 | null_error(); |
| 1562 | return -1; |
| 1563 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1564 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1565 | m = o->ob_type->tp_as_mapping; |
| 1566 | if (m && m->mp_length) |
| 1567 | return m->mp_length(o); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1568 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1569 | type_error("len() of unsized object"); |
| 1570 | return -1; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1571 | } |
| 1572 | |
Marc-André Lemburg | cf5f358 | 2000-07-17 09:22:55 +0000 | [diff] [blame] | 1573 | #undef PyMapping_Length |
| 1574 | int |
| 1575 | PyMapping_Length(PyObject *o) |
| 1576 | { |
| 1577 | return PyMapping_Size(o); |
| 1578 | } |
| 1579 | #define PyMapping_Length PyMapping_Size |
| 1580 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1581 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1582 | PyMapping_GetItemString(PyObject *o, char *key) |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1583 | { |
| 1584 | PyObject *okey, *r; |
| 1585 | |
| 1586 | if (key == NULL) |
| 1587 | return null_error(); |
| 1588 | |
| 1589 | okey = PyString_FromString(key); |
| 1590 | if (okey == NULL) |
| 1591 | return NULL; |
| 1592 | r = PyObject_GetItem(o, okey); |
| 1593 | Py_DECREF(okey); |
| 1594 | return r; |
| 1595 | } |
| 1596 | |
| 1597 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1598 | PyMapping_SetItemString(PyObject *o, char *key, PyObject *value) |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1599 | { |
| 1600 | PyObject *okey; |
| 1601 | int r; |
| 1602 | |
| 1603 | if (key == NULL) { |
| 1604 | null_error(); |
| 1605 | return -1; |
| 1606 | } |
| 1607 | |
| 1608 | okey = PyString_FromString(key); |
| 1609 | if (okey == NULL) |
Guido van Rossum | ed6219b | 1998-05-29 02:59:33 +0000 | [diff] [blame] | 1610 | return -1; |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1611 | r = PyObject_SetItem(o, okey, value); |
| 1612 | Py_DECREF(okey); |
| 1613 | return r; |
| 1614 | } |
| 1615 | |
| 1616 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1617 | PyMapping_HasKeyString(PyObject *o, char *key) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1618 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1619 | PyObject *v; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1620 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1621 | v = PyMapping_GetItemString(o, key); |
| 1622 | if (v) { |
| 1623 | Py_DECREF(v); |
| 1624 | return 1; |
| 1625 | } |
| 1626 | PyErr_Clear(); |
| 1627 | return 0; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1628 | } |
| 1629 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1630 | int |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1631 | PyMapping_HasKey(PyObject *o, PyObject *key) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1632 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1633 | PyObject *v; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1634 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1635 | v = PyObject_GetItem(o, key); |
| 1636 | if (v) { |
| 1637 | Py_DECREF(v); |
| 1638 | return 1; |
| 1639 | } |
| 1640 | PyErr_Clear(); |
| 1641 | return 0; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1642 | } |
| 1643 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1644 | /* Operations on callable objects */ |
| 1645 | |
| 1646 | /* XXX PyCallable_Check() is in object.c */ |
| 1647 | |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1648 | PyObject * |
Fred Drake | 7991247 | 2000-07-09 04:06:11 +0000 | [diff] [blame] | 1649 | PyObject_CallObject(PyObject *o, PyObject *a) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1650 | { |
Guido van Rossum | 5560b74 | 2001-09-14 16:47:50 +0000 | [diff] [blame] | 1651 | return PyEval_CallObjectWithKeywords(o, a, NULL); |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1652 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1653 | |
| 1654 | PyObject * |
Tim Peters | 6d6c1a3 | 2001-08-02 04:15:00 +0000 | [diff] [blame] | 1655 | PyObject_Call(PyObject *func, PyObject *arg, PyObject *kw) |
| 1656 | { |
| 1657 | ternaryfunc call; |
| 1658 | |
| 1659 | if ((call = func->ob_type->tp_call) != NULL) { |
| 1660 | PyObject *result = (*call)(func, arg, kw); |
| 1661 | if (result == NULL && !PyErr_Occurred()) |
| 1662 | PyErr_SetString( |
| 1663 | PyExc_SystemError, |
| 1664 | "NULL result without error in PyObject_Call"); |
| 1665 | return result; |
| 1666 | } |
Fred Drake | 573395a | 2001-11-01 20:26:12 +0000 | [diff] [blame] | 1667 | PyErr_Format(PyExc_TypeError, "'%s' object is not callable", |
| 1668 | func->ob_type->tp_name); |
Tim Peters | 6d6c1a3 | 2001-08-02 04:15:00 +0000 | [diff] [blame] | 1669 | return NULL; |
| 1670 | } |
| 1671 | |
| 1672 | PyObject * |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1673 | PyObject_CallFunction(PyObject *callable, char *format, ...) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1674 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1675 | va_list va; |
| 1676 | PyObject *args, *retval; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1677 | |
Fred Drake | b92cf06 | 2001-10-27 06:16:31 +0000 | [diff] [blame] | 1678 | if (callable == NULL) |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1679 | return null_error(); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1680 | |
Fred Drake | b92cf06 | 2001-10-27 06:16:31 +0000 | [diff] [blame] | 1681 | if (format && *format) { |
| 1682 | va_start(va, format); |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1683 | args = Py_VaBuildValue(format, va); |
Fred Drake | b92cf06 | 2001-10-27 06:16:31 +0000 | [diff] [blame] | 1684 | va_end(va); |
| 1685 | } |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1686 | else |
| 1687 | args = PyTuple_New(0); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1688 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1689 | if (args == NULL) |
| 1690 | return NULL; |
| 1691 | |
| 1692 | if (!PyTuple_Check(args)) { |
| 1693 | PyObject *a; |
| 1694 | |
| 1695 | a = PyTuple_New(1); |
| 1696 | if (a == NULL) |
| 1697 | return NULL; |
| 1698 | if (PyTuple_SetItem(a, 0, args) < 0) |
| 1699 | return NULL; |
| 1700 | args = a; |
| 1701 | } |
| 1702 | retval = PyObject_CallObject(callable, args); |
| 1703 | |
| 1704 | Py_DECREF(args); |
| 1705 | |
| 1706 | return retval; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1707 | } |
| 1708 | |
| 1709 | PyObject * |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1710 | PyObject_CallMethod(PyObject *o, char *name, char *format, ...) |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1711 | { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1712 | va_list va; |
| 1713 | PyObject *args, *func = 0, *retval; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1714 | |
Fred Drake | b92cf06 | 2001-10-27 06:16:31 +0000 | [diff] [blame] | 1715 | if (o == NULL || name == NULL) |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1716 | return null_error(); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1717 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1718 | func = PyObject_GetAttrString(o, name); |
| 1719 | if (func == NULL) { |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1720 | PyErr_SetString(PyExc_AttributeError, name); |
| 1721 | return 0; |
| 1722 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1723 | |
Fred Drake | b92cf06 | 2001-10-27 06:16:31 +0000 | [diff] [blame] | 1724 | if (!PyCallable_Check(func)) |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1725 | return type_error("call of non-callable attribute"); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1726 | |
Fred Drake | b92cf06 | 2001-10-27 06:16:31 +0000 | [diff] [blame] | 1727 | if (format && *format) { |
| 1728 | va_start(va, format); |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1729 | args = Py_VaBuildValue(format, va); |
Fred Drake | b92cf06 | 2001-10-27 06:16:31 +0000 | [diff] [blame] | 1730 | va_end(va); |
| 1731 | } |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1732 | else |
| 1733 | args = PyTuple_New(0); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1734 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1735 | if (!args) |
| 1736 | return NULL; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1737 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1738 | if (!PyTuple_Check(args)) { |
| 1739 | PyObject *a; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1740 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1741 | a = PyTuple_New(1); |
| 1742 | if (a == NULL) |
| 1743 | return NULL; |
| 1744 | if (PyTuple_SetItem(a, 0, args) < 0) |
| 1745 | return NULL; |
| 1746 | args = a; |
| 1747 | } |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1748 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1749 | retval = PyObject_CallObject(func, args); |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1750 | |
Guido van Rossum | cea1c8c | 1998-05-22 00:47:05 +0000 | [diff] [blame] | 1751 | Py_DECREF(args); |
| 1752 | Py_DECREF(func); |
| 1753 | |
| 1754 | return retval; |
Guido van Rossum | e15dee5 | 1995-07-18 14:12:02 +0000 | [diff] [blame] | 1755 | } |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1756 | |
| 1757 | |
Fred Drake | b421b8c | 2001-10-26 16:21:32 +0000 | [diff] [blame] | 1758 | static PyObject * |
Fred Drake | b0c079e | 2001-10-28 02:39:03 +0000 | [diff] [blame] | 1759 | objargs_mktuple(va_list va) |
Fred Drake | b421b8c | 2001-10-26 16:21:32 +0000 | [diff] [blame] | 1760 | { |
| 1761 | int i, n = 0; |
| 1762 | va_list countva; |
| 1763 | PyObject *result, *tmp; |
| 1764 | |
| 1765 | #ifdef VA_LIST_IS_ARRAY |
| 1766 | memcpy(countva, va, sizeof(va_list)); |
| 1767 | #else |
| 1768 | countva = va; |
| 1769 | #endif |
| 1770 | |
| 1771 | while (((PyObject *)va_arg(countva, PyObject *)) != NULL) |
| 1772 | ++n; |
| 1773 | result = PyTuple_New(n); |
| 1774 | if (result != NULL && n > 0) { |
| 1775 | for (i = 0; i < n; ++i) { |
| 1776 | tmp = (PyObject *)va_arg(va, PyObject *); |
| 1777 | PyTuple_SET_ITEM(result, i, tmp); |
| 1778 | Py_INCREF(tmp); |
| 1779 | } |
| 1780 | } |
| 1781 | return result; |
| 1782 | } |
| 1783 | |
| 1784 | PyObject * |
Fred Drake | b0c079e | 2001-10-28 02:39:03 +0000 | [diff] [blame] | 1785 | PyObject_CallMethodObjArgs(PyObject *callable, PyObject *name, ...) |
Fred Drake | b421b8c | 2001-10-26 16:21:32 +0000 | [diff] [blame] | 1786 | { |
| 1787 | PyObject *args, *tmp; |
| 1788 | va_list vargs; |
| 1789 | |
| 1790 | if (callable == NULL || name == NULL) |
| 1791 | return null_error(); |
| 1792 | |
| 1793 | callable = PyObject_GetAttr(callable, name); |
| 1794 | if (callable == NULL) |
| 1795 | return NULL; |
| 1796 | |
| 1797 | /* count the args */ |
| 1798 | va_start(vargs, name); |
Fred Drake | b0c079e | 2001-10-28 02:39:03 +0000 | [diff] [blame] | 1799 | args = objargs_mktuple(vargs); |
Fred Drake | b421b8c | 2001-10-26 16:21:32 +0000 | [diff] [blame] | 1800 | va_end(vargs); |
| 1801 | if (args == NULL) { |
| 1802 | Py_DECREF(callable); |
| 1803 | return NULL; |
| 1804 | } |
| 1805 | tmp = PyObject_Call(callable, args, NULL); |
| 1806 | Py_DECREF(args); |
| 1807 | Py_DECREF(callable); |
| 1808 | |
| 1809 | return tmp; |
| 1810 | } |
| 1811 | |
| 1812 | PyObject * |
Fred Drake | b0c079e | 2001-10-28 02:39:03 +0000 | [diff] [blame] | 1813 | PyObject_CallFunctionObjArgs(PyObject *callable, ...) |
Fred Drake | b421b8c | 2001-10-26 16:21:32 +0000 | [diff] [blame] | 1814 | { |
| 1815 | PyObject *args, *tmp; |
| 1816 | va_list vargs; |
| 1817 | |
| 1818 | if (callable == NULL) |
| 1819 | return null_error(); |
| 1820 | |
| 1821 | /* count the args */ |
| 1822 | va_start(vargs, callable); |
Fred Drake | b0c079e | 2001-10-28 02:39:03 +0000 | [diff] [blame] | 1823 | args = objargs_mktuple(vargs); |
Fred Drake | b421b8c | 2001-10-26 16:21:32 +0000 | [diff] [blame] | 1824 | va_end(vargs); |
| 1825 | if (args == NULL) |
| 1826 | return NULL; |
| 1827 | tmp = PyObject_Call(callable, args, NULL); |
| 1828 | Py_DECREF(args); |
| 1829 | |
| 1830 | return tmp; |
| 1831 | } |
| 1832 | |
| 1833 | |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1834 | /* isinstance(), issubclass() */ |
| 1835 | |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1836 | static PyObject * |
| 1837 | abstract_get_bases(PyObject *cls) |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1838 | { |
| 1839 | static PyObject *__bases__ = NULL; |
| 1840 | PyObject *bases; |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1841 | |
| 1842 | if (__bases__ == NULL) { |
| 1843 | __bases__ = PyString_FromString("__bases__"); |
| 1844 | if (__bases__ == NULL) |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1845 | return NULL; |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1846 | } |
| 1847 | |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1848 | bases = PyObject_GetAttr(cls, __bases__); |
| 1849 | if (bases == NULL || !PyTuple_Check(bases)) { |
| 1850 | Py_XDECREF(bases); |
| 1851 | return NULL; |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1852 | } |
| 1853 | |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1854 | return bases; |
| 1855 | } |
| 1856 | |
| 1857 | |
| 1858 | static int |
| 1859 | abstract_issubclass(PyObject *derived, PyObject *cls) |
| 1860 | { |
| 1861 | PyObject *bases; |
| 1862 | int i, n; |
| 1863 | int r = 0; |
| 1864 | |
| 1865 | |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1866 | if (derived == cls) |
| 1867 | return 1; |
| 1868 | |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1869 | bases = abstract_get_bases(derived); |
| 1870 | if (bases == NULL) |
| 1871 | return 0; |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1872 | |
| 1873 | n = PyTuple_GET_SIZE(bases); |
| 1874 | for (i = 0; i < n; i++) { |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1875 | r = abstract_issubclass(PyTuple_GET_ITEM(bases, i), cls); |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1876 | if (r != 0) |
| 1877 | break; |
| 1878 | } |
| 1879 | |
| 1880 | Py_DECREF(bases); |
| 1881 | |
| 1882 | return r; |
| 1883 | } |
| 1884 | |
| 1885 | int |
| 1886 | PyObject_IsInstance(PyObject *inst, PyObject *cls) |
| 1887 | { |
| 1888 | PyObject *icls; |
| 1889 | static PyObject *__class__ = NULL; |
| 1890 | int retval = 0; |
| 1891 | |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1892 | if (PyClass_Check(cls) && PyInstance_Check(inst)) { |
| 1893 | PyObject *inclass = |
| 1894 | (PyObject*)((PyInstanceObject*)inst)->in_class; |
| 1895 | retval = PyClass_IsSubclass(inclass, cls); |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1896 | } |
| 1897 | else if (PyType_Check(cls)) { |
Tim Peters | 6d6c1a3 | 2001-08-02 04:15:00 +0000 | [diff] [blame] | 1898 | retval = PyObject_TypeCheck(inst, (PyTypeObject *)cls); |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1899 | } |
Guido van Rossum | 03290ec | 2001-10-07 20:54:12 +0000 | [diff] [blame] | 1900 | else if (PyTuple_Check(cls)) { |
| 1901 | /* Not a general sequence -- that opens up the road to |
| 1902 | recursion and stack overflow. */ |
| 1903 | int i, n; |
| 1904 | |
| 1905 | n = PyTuple_GET_SIZE(cls); |
| 1906 | for (i = 0; i < n; i++) { |
| 1907 | retval = PyObject_IsInstance( |
| 1908 | inst, PyTuple_GET_ITEM(cls, i)); |
| 1909 | if (retval != 0) |
| 1910 | break; |
| 1911 | } |
| 1912 | return retval; |
| 1913 | } |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1914 | else { |
| 1915 | PyObject *cls_bases = abstract_get_bases(cls); |
| 1916 | if (cls_bases == NULL) { |
| 1917 | PyErr_SetString(PyExc_TypeError, |
| 1918 | "isinstance() arg 2 must be a class or type"); |
| 1919 | return -1; |
| 1920 | } |
| 1921 | Py_DECREF(cls_bases); |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1922 | if (__class__ == NULL) { |
| 1923 | __class__ = PyString_FromString("__class__"); |
| 1924 | if (__class__ == NULL) |
| 1925 | return -1; |
| 1926 | } |
| 1927 | icls = PyObject_GetAttr(inst, __class__); |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1928 | if (icls == NULL) { |
| 1929 | PyErr_Clear(); |
| 1930 | retval = 0; |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1931 | } |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1932 | else { |
| 1933 | retval = abstract_issubclass(icls, cls); |
| 1934 | Py_DECREF(icls); |
| 1935 | } |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1936 | } |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1937 | |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1938 | return retval; |
| 1939 | } |
| 1940 | |
| 1941 | int |
| 1942 | PyObject_IsSubclass(PyObject *derived, PyObject *cls) |
| 1943 | { |
| 1944 | int retval; |
| 1945 | |
| 1946 | if (!PyClass_Check(derived) || !PyClass_Check(cls)) { |
Neil Schemenauer | 6b47129 | 2001-10-18 03:18:43 +0000 | [diff] [blame] | 1947 | PyObject *derived_bases; |
| 1948 | PyObject *cls_bases; |
| 1949 | |
| 1950 | derived_bases = abstract_get_bases(derived); |
| 1951 | if (derived_bases == NULL) { |
| 1952 | PyErr_SetString(PyExc_TypeError, |
| 1953 | "issubclass() arg 1 must be a class"); |
| 1954 | return -1; |
| 1955 | } |
| 1956 | Py_DECREF(derived_bases); |
| 1957 | |
| 1958 | cls_bases = abstract_get_bases(cls); |
| 1959 | if (cls_bases == NULL) { |
| 1960 | PyErr_SetString(PyExc_TypeError, |
| 1961 | "issubclass() arg 2 must be a class"); |
| 1962 | return -1; |
| 1963 | } |
| 1964 | Py_DECREF(cls_bases); |
| 1965 | |
| 1966 | retval = abstract_issubclass(derived, cls); |
Guido van Rossum | 823649d | 2001-03-21 18:40:58 +0000 | [diff] [blame] | 1967 | } |
| 1968 | else { |
| 1969 | /* shortcut */ |
| 1970 | if (!(retval = (derived == cls))) |
| 1971 | retval = PyClass_IsSubclass(derived, cls); |
| 1972 | } |
| 1973 | |
| 1974 | return retval; |
| 1975 | } |
Guido van Rossum | 59d1d2b | 2001-04-20 19:13:02 +0000 | [diff] [blame] | 1976 | |
| 1977 | PyObject * |
| 1978 | PyObject_GetIter(PyObject *o) |
| 1979 | { |
| 1980 | PyTypeObject *t = o->ob_type; |
| 1981 | getiterfunc f = NULL; |
| 1982 | if (PyType_HasFeature(t, Py_TPFLAGS_HAVE_ITER)) |
| 1983 | f = t->tp_iter; |
| 1984 | if (f == NULL) { |
| 1985 | if (PySequence_Check(o)) |
Guido van Rossum | 213c7a6 | 2001-04-23 14:08:49 +0000 | [diff] [blame] | 1986 | return PySeqIter_New(o); |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 1987 | PyErr_SetString(PyExc_TypeError, |
| 1988 | "iteration over non-sequence"); |
Guido van Rossum | 59d1d2b | 2001-04-20 19:13:02 +0000 | [diff] [blame] | 1989 | return NULL; |
| 1990 | } |
Guido van Rossum | 213c7a6 | 2001-04-23 14:08:49 +0000 | [diff] [blame] | 1991 | else { |
| 1992 | PyObject *res = (*f)(o); |
| 1993 | if (res != NULL && !PyIter_Check(res)) { |
| 1994 | PyErr_Format(PyExc_TypeError, |
| 1995 | "iter() returned non-iterator " |
| 1996 | "of type '%.100s'", |
| 1997 | res->ob_type->tp_name); |
| 1998 | Py_DECREF(res); |
| 1999 | res = NULL; |
| 2000 | } |
| 2001 | return res; |
| 2002 | } |
| 2003 | } |
| 2004 | |
Tim Peters | f4848da | 2001-05-05 00:14:56 +0000 | [diff] [blame] | 2005 | /* Return next item. |
| 2006 | * If an error occurs, return NULL. PyErr_Occurred() will be true. |
| 2007 | * If the iteration terminates normally, return NULL and clear the |
| 2008 | * PyExc_StopIteration exception (if it was set). PyErr_Occurred() |
| 2009 | * will be false. |
| 2010 | * Else return the next object. PyErr_Occurred() will be false. |
| 2011 | */ |
Guido van Rossum | 213c7a6 | 2001-04-23 14:08:49 +0000 | [diff] [blame] | 2012 | PyObject * |
| 2013 | PyIter_Next(PyObject *iter) |
| 2014 | { |
Tim Peters | f4848da | 2001-05-05 00:14:56 +0000 | [diff] [blame] | 2015 | PyObject *result; |
Guido van Rossum | 213c7a6 | 2001-04-23 14:08:49 +0000 | [diff] [blame] | 2016 | if (!PyIter_Check(iter)) { |
| 2017 | PyErr_Format(PyExc_TypeError, |
| 2018 | "'%.100s' object is not an iterator", |
| 2019 | iter->ob_type->tp_name); |
| 2020 | return NULL; |
| 2021 | } |
Tim Peters | f4848da | 2001-05-05 00:14:56 +0000 | [diff] [blame] | 2022 | result = (*iter->ob_type->tp_iternext)(iter); |
| 2023 | if (result == NULL && |
| 2024 | PyErr_Occurred() && |
| 2025 | PyErr_ExceptionMatches(PyExc_StopIteration)) |
| 2026 | PyErr_Clear(); |
| 2027 | return result; |
Guido van Rossum | 59d1d2b | 2001-04-20 19:13:02 +0000 | [diff] [blame] | 2028 | } |
Jeremy Hylton | 89c3a22 | 2001-11-09 21:59:42 +0000 | [diff] [blame^] | 2029 | |