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