blob: c5068efed47c443439f079b4da9461a66611e0ae [file] [log] [blame]
Tim Peters9ea17ac2001-02-02 05:57:15 +00001/*
2 * C Extension module to test Python interpreter C APIs.
3 *
4 * The 'test_*' functions exported by this module are run as part of the
5 * standard Python regression test, via Lib/test/test_capi.py.
6 */
7
8#include "Python.h"
Martin v. Löwis2ec1df22006-10-27 06:43:00 +00009#ifdef HAVE_VALUES_H
Martin v. Löwis62e58042006-10-27 06:17:21 +000010#include <values.h>
Martin v. Löwis2ec1df22006-10-27 06:43:00 +000011#endif
Martin v. Löwis62e58042006-10-27 06:17:21 +000012#include "structmember.h"
Tim Peters9ea17ac2001-02-02 05:57:15 +000013
Mark Hammond8d98d2c2003-04-19 15:41:53 +000014#ifdef WITH_THREAD
15#include "pythread.h"
16#endif /* WITH_THREAD */
Tim Peters9ea17ac2001-02-02 05:57:15 +000017static PyObject *TestError; /* set to exception object in init */
18
Tim Peters91621db2001-06-12 20:10:01 +000019/* Raise TestError with test_name + ": " + msg, and return NULL. */
20
21static PyObject *
22raiseTestError(const char* test_name, const char* msg)
23{
24 char buf[2048];
25
26 if (strlen(test_name) + strlen(msg) > sizeof(buf) - 50)
27 PyErr_SetString(TestError, "internal error msg too large");
28 else {
Tim Peters885d4572001-11-28 20:27:42 +000029 PyOS_snprintf(buf, sizeof(buf), "%s: %s", test_name, msg);
Tim Peters91621db2001-06-12 20:10:01 +000030 PyErr_SetString(TestError, buf);
31 }
32 return NULL;
33}
34
Martin v. Löwis4f1cd8b2001-07-26 13:41:06 +000035/* Test #defines from pyconfig.h (particularly the SIZEOF_* defines).
Tim Peters9ea17ac2001-02-02 05:57:15 +000036
37 The ones derived from autoconf on the UNIX-like OSes can be relied
38 upon (in the absence of sloppy cross-compiling), but the Windows
39 platforms have these hardcoded. Better safe than sorry.
40*/
41static PyObject*
Martin v. Löwis62e58042006-10-27 06:17:21 +000042sizeof_error(const char* fatname, const char* typname,
Tim Peters9ea17ac2001-02-02 05:57:15 +000043 int expected, int got)
44{
45 char buf[1024];
Tim Petersbaefd9e2003-01-28 20:37:45 +000046 PyOS_snprintf(buf, sizeof(buf),
Tim Peters885d4572001-11-28 20:27:42 +000047 "%.200s #define == %d but sizeof(%.200s) == %d",
Martin v. Löwis62e58042006-10-27 06:17:21 +000048 fatname, expected, typname, got);
Tim Peters9ea17ac2001-02-02 05:57:15 +000049 PyErr_SetString(TestError, buf);
50 return (PyObject*)NULL;
51}
52
53static PyObject*
Fred Drakeacee69f2002-04-01 14:28:58 +000054test_config(PyObject *self)
Tim Peters9ea17ac2001-02-02 05:57:15 +000055{
Tim Peters9ea17ac2001-02-02 05:57:15 +000056#define CHECK_SIZEOF(FATNAME, TYPE) \
57 if (FATNAME != sizeof(TYPE)) \
58 return sizeof_error(#FATNAME, #TYPE, FATNAME, sizeof(TYPE))
59
Tim Peters208efe52001-06-26 22:40:47 +000060 CHECK_SIZEOF(SIZEOF_SHORT, short);
Tim Peters9ea17ac2001-02-02 05:57:15 +000061 CHECK_SIZEOF(SIZEOF_INT, int);
62 CHECK_SIZEOF(SIZEOF_LONG, long);
63 CHECK_SIZEOF(SIZEOF_VOID_P, void*);
64 CHECK_SIZEOF(SIZEOF_TIME_T, time_t);
65#ifdef HAVE_LONG_LONG
Martin v. Löwisb9a0f912003-03-29 10:06:18 +000066 CHECK_SIZEOF(SIZEOF_LONG_LONG, PY_LONG_LONG);
Tim Peters9ea17ac2001-02-02 05:57:15 +000067#endif
68
69#undef CHECK_SIZEOF
70
71 Py_INCREF(Py_None);
72 return Py_None;
73}
74
Tim Peters5c4d5bf2001-02-12 22:13:26 +000075static PyObject*
Fred Drakeacee69f2002-04-01 14:28:58 +000076test_list_api(PyObject *self)
Tim Peters5c4d5bf2001-02-12 22:13:26 +000077{
78 PyObject* list;
79 int i;
Tim Peters5c4d5bf2001-02-12 22:13:26 +000080
81 /* SF bug 132008: PyList_Reverse segfaults */
82#define NLIST 30
83 list = PyList_New(NLIST);
84 if (list == (PyObject*)NULL)
85 return (PyObject*)NULL;
86 /* list = range(NLIST) */
87 for (i = 0; i < NLIST; ++i) {
88 PyObject* anint = PyInt_FromLong(i);
89 if (anint == (PyObject*)NULL) {
90 Py_DECREF(list);
91 return (PyObject*)NULL;
92 }
93 PyList_SET_ITEM(list, i, anint);
94 }
95 /* list.reverse(), via PyList_Reverse() */
96 i = PyList_Reverse(list); /* should not blow up! */
97 if (i != 0) {
98 Py_DECREF(list);
99 return (PyObject*)NULL;
100 }
101 /* Check that list == range(29, -1, -1) now */
102 for (i = 0; i < NLIST; ++i) {
103 PyObject* anint = PyList_GET_ITEM(list, i);
104 if (PyInt_AS_LONG(anint) != NLIST-1-i) {
105 PyErr_SetString(TestError,
106 "test_list_api: reverse screwed up");
107 Py_DECREF(list);
108 return (PyObject*)NULL;
109 }
110 }
111 Py_DECREF(list);
112#undef NLIST
113
114 Py_INCREF(Py_None);
115 return Py_None;
116}
117
Guido van Rossumeb0d9922001-04-13 17:08:15 +0000118static int
119test_dict_inner(int count)
120{
Martin v. Löwis18e16552006-02-15 17:27:45 +0000121 Py_ssize_t pos = 0, iterations = 0;
122 int i;
Guido van Rossumeb0d9922001-04-13 17:08:15 +0000123 PyObject *dict = PyDict_New();
124 PyObject *v, *k;
125
126 if (dict == NULL)
127 return -1;
128
129 for (i = 0; i < count; i++) {
130 v = PyInt_FromLong(i);
131 PyDict_SetItem(dict, v, v);
132 Py_DECREF(v);
133 }
134
135 while (PyDict_Next(dict, &pos, &k, &v)) {
136 PyObject *o;
137 iterations++;
138
139 i = PyInt_AS_LONG(v) + 1;
140 o = PyInt_FromLong(i);
141 if (o == NULL)
142 return -1;
143 if (PyDict_SetItem(dict, k, o) < 0) {
144 Py_DECREF(o);
145 return -1;
146 }
147 Py_DECREF(o);
148 }
149
150 Py_DECREF(dict);
151
152 if (iterations != count) {
153 PyErr_SetString(
154 TestError,
155 "test_dict_iteration: dict iteration went wrong ");
156 return -1;
157 } else {
158 return 0;
159 }
160}
161
162static PyObject*
Fred Drakeacee69f2002-04-01 14:28:58 +0000163test_dict_iteration(PyObject* self)
Guido van Rossumeb0d9922001-04-13 17:08:15 +0000164{
165 int i;
166
Guido van Rossumeb0d9922001-04-13 17:08:15 +0000167 for (i = 0; i < 200; i++) {
168 if (test_dict_inner(i) < 0) {
169 return NULL;
170 }
171 }
172
173 Py_INCREF(Py_None);
174 return Py_None;
175}
176
Tim Peters91621db2001-06-12 20:10:01 +0000177
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000178/* Tests of PyLong_{As, From}{Unsigned,}Long(), and (#ifdef HAVE_LONG_LONG)
Tim Petersff70d3c2001-06-14 01:11:03 +0000179 PyLong_{As, From}{Unsigned,}LongLong().
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000180
181 Note that the meat of the test is contained in testcapi_long.h.
182 This is revolting, but delicate code duplication is worse: "almost
Martin v. Löwisb9a0f912003-03-29 10:06:18 +0000183 exactly the same" code is needed to test PY_LONG_LONG, but the ubiquitous
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000184 dependence on type names makes it impossible to use a parameterized
185 function. A giant macro would be even worse than this. A C++ template
186 would be perfect.
187
188 The "report an error" functions are deliberately not part of the #include
189 file: if the test fails, you can set a breakpoint in the appropriate
190 error function directly, and crawl back from there in the debugger.
191*/
192
193#define UNBIND(X) Py_DECREF(X); (X) = NULL
194
195static PyObject *
196raise_test_long_error(const char* msg)
197{
198 return raiseTestError("test_long_api", msg);
199}
200
201#define TESTNAME test_long_api_inner
202#define TYPENAME long
203#define F_S_TO_PY PyLong_FromLong
204#define F_PY_TO_S PyLong_AsLong
205#define F_U_TO_PY PyLong_FromUnsignedLong
206#define F_PY_TO_U PyLong_AsUnsignedLong
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000207
208#include "testcapi_long.h"
209
210static PyObject *
Fred Drakeacee69f2002-04-01 14:28:58 +0000211test_long_api(PyObject* self)
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000212{
Tim Peters83c9edc2001-06-16 08:10:13 +0000213 return TESTNAME(raise_test_long_error);
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000214}
215
216#undef TESTNAME
217#undef TYPENAME
218#undef F_S_TO_PY
219#undef F_PY_TO_S
220#undef F_U_TO_PY
221#undef F_PY_TO_U
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000222
223#ifdef HAVE_LONG_LONG
Tim Peters91621db2001-06-12 20:10:01 +0000224
225static PyObject *
Tim Petersd1a7da62001-06-13 00:35:57 +0000226raise_test_longlong_error(const char* msg)
227{
228 return raiseTestError("test_longlong_api", msg);
229}
230
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000231#define TESTNAME test_longlong_api_inner
Martin v. Löwisb9a0f912003-03-29 10:06:18 +0000232#define TYPENAME PY_LONG_LONG
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000233#define F_S_TO_PY PyLong_FromLongLong
234#define F_PY_TO_S PyLong_AsLongLong
235#define F_U_TO_PY PyLong_FromUnsignedLongLong
236#define F_PY_TO_U PyLong_AsUnsignedLongLong
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000237
238#include "testcapi_long.h"
Tim Petersd1a7da62001-06-13 00:35:57 +0000239
240static PyObject *
Skip Montanaro9582c142006-04-18 01:01:41 +0000241test_longlong_api(PyObject* self, PyObject *args)
Tim Peters91621db2001-06-12 20:10:01 +0000242{
Tim Peters83c9edc2001-06-16 08:10:13 +0000243 return TESTNAME(raise_test_longlong_error);
Tim Peters91621db2001-06-12 20:10:01 +0000244}
245
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000246#undef TESTNAME
247#undef TYPENAME
248#undef F_S_TO_PY
249#undef F_PY_TO_S
250#undef F_U_TO_PY
251#undef F_PY_TO_U
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000252
Martin v. Löwisb9a0f912003-03-29 10:06:18 +0000253/* Test the L code for PyArg_ParseTuple. This should deliver a PY_LONG_LONG
Tim Petersd38b1c72001-09-30 05:09:37 +0000254 for both long and int arguments. The test may leak a little memory if
255 it fails.
256*/
257static PyObject *
Fred Drakeacee69f2002-04-01 14:28:58 +0000258test_L_code(PyObject *self)
Tim Petersd38b1c72001-09-30 05:09:37 +0000259{
260 PyObject *tuple, *num;
Martin v. Löwisb9a0f912003-03-29 10:06:18 +0000261 PY_LONG_LONG value;
Tim Petersd38b1c72001-09-30 05:09:37 +0000262
Tim Petersd38b1c72001-09-30 05:09:37 +0000263 tuple = PyTuple_New(1);
264 if (tuple == NULL)
265 return NULL;
266
267 num = PyLong_FromLong(42);
268 if (num == NULL)
269 return NULL;
270
271 PyTuple_SET_ITEM(tuple, 0, num);
272
273 value = -1;
274 if (PyArg_ParseTuple(tuple, "L:test_L_code", &value) < 0)
275 return NULL;
276 if (value != 42)
277 return raiseTestError("test_L_code",
278 "L code returned wrong value for long 42");
279
280 Py_DECREF(num);
281 num = PyInt_FromLong(42);
282 if (num == NULL)
283 return NULL;
284
285 PyTuple_SET_ITEM(tuple, 0, num);
286
287 value = -1;
288 if (PyArg_ParseTuple(tuple, "L:test_L_code", &value) < 0)
289 return NULL;
290 if (value != 42)
291 return raiseTestError("test_L_code",
292 "L code returned wrong value for int 42");
293
294 Py_DECREF(tuple);
295 Py_INCREF(Py_None);
296 return Py_None;
297}
298
Tim Peterse7c1f9b2001-06-14 00:55:41 +0000299#endif /* ifdef HAVE_LONG_LONG */
300
Georg Brandl5f135782006-07-26 08:03:10 +0000301/* Test tuple argument processing */
302static PyObject *
303getargs_tuple(PyObject *self, PyObject *args)
304{
305 int a, b, c;
306 if (!PyArg_ParseTuple(args, "i(ii)", &a, &b, &c))
307 return NULL;
308 return Py_BuildValue("iii", a, b, c);
309}
310
Thomas Heller3457e4b2003-04-24 16:14:27 +0000311/* Functions to call PyArg_ParseTuple with integer format codes,
312 and return the result.
313*/
Thomas Hellera4ea6032003-04-17 18:55:45 +0000314static PyObject *
Thomas Heller3457e4b2003-04-24 16:14:27 +0000315getargs_b(PyObject *self, PyObject *args)
Thomas Hellera4ea6032003-04-17 18:55:45 +0000316{
Thomas Heller3457e4b2003-04-24 16:14:27 +0000317 unsigned char value;
318 if (!PyArg_ParseTuple(args, "b", &value))
Thomas Hellera4ea6032003-04-17 18:55:45 +0000319 return NULL;
Thomas Heller3457e4b2003-04-24 16:14:27 +0000320 return PyLong_FromUnsignedLong((unsigned long)value);
Thomas Hellera4ea6032003-04-17 18:55:45 +0000321}
322
Thomas Heller3457e4b2003-04-24 16:14:27 +0000323static PyObject *
324getargs_B(PyObject *self, PyObject *args)
325{
326 unsigned char value;
327 if (!PyArg_ParseTuple(args, "B", &value))
328 return NULL;
329 return PyLong_FromUnsignedLong((unsigned long)value);
330}
331
332static PyObject *
333getargs_H(PyObject *self, PyObject *args)
334{
335 unsigned short value;
336 if (!PyArg_ParseTuple(args, "H", &value))
337 return NULL;
338 return PyLong_FromUnsignedLong((unsigned long)value);
339}
340
341static PyObject *
342getargs_I(PyObject *self, PyObject *args)
343{
344 unsigned int value;
345 if (!PyArg_ParseTuple(args, "I", &value))
346 return NULL;
347 return PyLong_FromUnsignedLong((unsigned long)value);
348}
349
350static PyObject *
351getargs_k(PyObject *self, PyObject *args)
352{
353 unsigned long value;
354 if (!PyArg_ParseTuple(args, "k", &value))
355 return NULL;
356 return PyLong_FromUnsignedLong(value);
357}
358
359static PyObject *
360getargs_i(PyObject *self, PyObject *args)
361{
362 int value;
363 if (!PyArg_ParseTuple(args, "i", &value))
364 return NULL;
365 return PyLong_FromLong((long)value);
366}
367
Thomas Hellera4ea6032003-04-17 18:55:45 +0000368static PyObject *
369getargs_l(PyObject *self, PyObject *args)
370{
Thomas Heller3457e4b2003-04-24 16:14:27 +0000371 long value;
372 if (!PyArg_ParseTuple(args, "l", &value))
Thomas Hellera4ea6032003-04-17 18:55:45 +0000373 return NULL;
Thomas Heller3457e4b2003-04-24 16:14:27 +0000374 return PyLong_FromLong(value);
Thomas Hellera4ea6032003-04-17 18:55:45 +0000375}
376
Georg Brandl7f573f72006-04-13 07:59:30 +0000377static PyObject *
378getargs_n(PyObject *self, PyObject *args)
379{
380 Py_ssize_t value;
381 if (!PyArg_ParseTuple(args, "n", &value))
382 return NULL;
383 return PyInt_FromSsize_t(value);
384}
385
Thomas Hellera4ea6032003-04-17 18:55:45 +0000386#ifdef HAVE_LONG_LONG
Thomas Hellera4ea6032003-04-17 18:55:45 +0000387static PyObject *
Thomas Heller3457e4b2003-04-24 16:14:27 +0000388getargs_L(PyObject *self, PyObject *args)
Thomas Hellera4ea6032003-04-17 18:55:45 +0000389{
Thomas Heller3457e4b2003-04-24 16:14:27 +0000390 PY_LONG_LONG value;
391 if (!PyArg_ParseTuple(args, "L", &value))
Thomas Hellera4ea6032003-04-17 18:55:45 +0000392 return NULL;
Thomas Heller3457e4b2003-04-24 16:14:27 +0000393 return PyLong_FromLongLong(value);
Thomas Hellera4ea6032003-04-17 18:55:45 +0000394}
395
Thomas Hellera4ea6032003-04-17 18:55:45 +0000396static PyObject *
Thomas Heller3457e4b2003-04-24 16:14:27 +0000397getargs_K(PyObject *self, PyObject *args)
Thomas Hellera4ea6032003-04-17 18:55:45 +0000398{
Thomas Heller3457e4b2003-04-24 16:14:27 +0000399 unsigned PY_LONG_LONG value;
400 if (!PyArg_ParseTuple(args, "K", &value))
Thomas Hellera4ea6032003-04-17 18:55:45 +0000401 return NULL;
Thomas Heller3457e4b2003-04-24 16:14:27 +0000402 return PyLong_FromUnsignedLongLong(value);
Thomas Hellera4ea6032003-04-17 18:55:45 +0000403}
404#endif
405
406/* This function not only tests the 'k' getargs code, but also the
407 PyInt_AsUnsignedLongMask() and PyInt_AsUnsignedLongMask() functions. */
408static PyObject *
409test_k_code(PyObject *self)
410{
411 PyObject *tuple, *num;
412 unsigned long value;
413
414 tuple = PyTuple_New(1);
415 if (tuple == NULL)
416 return NULL;
417
Neal Norwitz699cbb72003-04-22 01:28:57 +0000418 /* a number larger than ULONG_MAX even on 64-bit platforms */
Thomas Hellera4ea6032003-04-17 18:55:45 +0000419 num = PyLong_FromString("FFFFFFFFFFFFFFFFFFFFFFFF", NULL, 16);
420 if (num == NULL)
421 return NULL;
422
423 value = PyInt_AsUnsignedLongMask(num);
Neal Norwitz699cbb72003-04-22 01:28:57 +0000424 if (value != ULONG_MAX)
Thomas Hellera4ea6032003-04-17 18:55:45 +0000425 return raiseTestError("test_k_code",
426 "PyInt_AsUnsignedLongMask() returned wrong value for long 0xFFF...FFF");
427
428 PyTuple_SET_ITEM(tuple, 0, num);
429
Neal Norwitzb183a252006-04-10 01:03:32 +0000430 value = 0;
Thomas Hellera4ea6032003-04-17 18:55:45 +0000431 if (PyArg_ParseTuple(tuple, "k:test_k_code", &value) < 0)
432 return NULL;
Neal Norwitz699cbb72003-04-22 01:28:57 +0000433 if (value != ULONG_MAX)
Thomas Hellera4ea6032003-04-17 18:55:45 +0000434 return raiseTestError("test_k_code",
435 "k code returned wrong value for long 0xFFF...FFF");
436
437 Py_DECREF(num);
438 num = PyLong_FromString("-FFFFFFFF000000000000000042", NULL, 16);
439 if (num == NULL)
440 return NULL;
441
442 value = PyInt_AsUnsignedLongMask(num);
443 if (value != (unsigned long)-0x42)
444 return raiseTestError("test_k_code",
445 "PyInt_AsUnsignedLongMask() returned wrong value for long 0xFFF...FFF");
446
447 PyTuple_SET_ITEM(tuple, 0, num);
448
Neal Norwitzb183a252006-04-10 01:03:32 +0000449 value = 0;
Thomas Hellera4ea6032003-04-17 18:55:45 +0000450 if (PyArg_ParseTuple(tuple, "k:test_k_code", &value) < 0)
451 return NULL;
452 if (value != (unsigned long)-0x42)
453 return raiseTestError("test_k_code",
454 "k code returned wrong value for long -0xFFF..000042");
455
456 Py_DECREF(tuple);
457 Py_INCREF(Py_None);
458 return Py_None;
459}
460
Marc-André Lemburg3e3eacb2002-01-09 16:21:27 +0000461#ifdef Py_USING_UNICODE
462
463/* Test the u and u# codes for PyArg_ParseTuple. May leak memory in case
464 of an error.
465*/
466static PyObject *
Fred Drakeacee69f2002-04-01 14:28:58 +0000467test_u_code(PyObject *self)
Marc-André Lemburg3e3eacb2002-01-09 16:21:27 +0000468{
469 PyObject *tuple, *obj;
470 Py_UNICODE *value;
471 int len;
472
Marc-André Lemburg3e3eacb2002-01-09 16:21:27 +0000473 tuple = PyTuple_New(1);
474 if (tuple == NULL)
475 return NULL;
476
477 obj = PyUnicode_Decode("test", strlen("test"),
478 "ascii", NULL);
479 if (obj == NULL)
480 return NULL;
481
482 PyTuple_SET_ITEM(tuple, 0, obj);
483
484 value = 0;
485 if (PyArg_ParseTuple(tuple, "u:test_u_code", &value) < 0)
486 return NULL;
487 if (value != PyUnicode_AS_UNICODE(obj))
488 return raiseTestError("test_u_code",
489 "u code returned wrong value for u'test'");
490 value = 0;
491 if (PyArg_ParseTuple(tuple, "u#:test_u_code", &value, &len) < 0)
492 return NULL;
493 if (value != PyUnicode_AS_UNICODE(obj) ||
494 len != PyUnicode_GET_SIZE(obj))
495 return raiseTestError("test_u_code",
496 "u# code returned wrong values for u'test'");
Tim Petersbaefd9e2003-01-28 20:37:45 +0000497
Marc-André Lemburg3e3eacb2002-01-09 16:21:27 +0000498 Py_DECREF(tuple);
499 Py_INCREF(Py_None);
500 return Py_None;
501}
502
Tim Peters8931ff12006-05-13 23:28:20 +0000503static PyObject *
504codec_incrementalencoder(PyObject *self, PyObject *args)
Walter Dörwald9ae019b2006-03-18 14:22:26 +0000505{
506 const char *encoding, *errors = NULL;
Tim Peters59b96c12006-03-21 03:58:41 +0000507 if (!PyArg_ParseTuple(args, "s|s:test_incrementalencoder",
Walter Dörwald9ae019b2006-03-18 14:22:26 +0000508 &encoding, &errors))
509 return NULL;
510 return PyCodec_IncrementalEncoder(encoding, errors);
511}
512
Tim Peters8931ff12006-05-13 23:28:20 +0000513static PyObject *
514codec_incrementaldecoder(PyObject *self, PyObject *args)
Walter Dörwald9ae019b2006-03-18 14:22:26 +0000515{
516 const char *encoding, *errors = NULL;
Tim Peters59b96c12006-03-21 03:58:41 +0000517 if (!PyArg_ParseTuple(args, "s|s:test_incrementaldecoder",
Walter Dörwald9ae019b2006-03-18 14:22:26 +0000518 &encoding, &errors))
519 return NULL;
520 return PyCodec_IncrementalDecoder(encoding, errors);
521}
522
Marc-André Lemburg3e3eacb2002-01-09 16:21:27 +0000523#endif
524
Tim Peters5b8132f2003-01-31 15:52:05 +0000525/* Simple test of _PyLong_NumBits and _PyLong_Sign. */
Tim Petersbaefd9e2003-01-28 20:37:45 +0000526static PyObject *
527test_long_numbits(PyObject *self)
528{
Tim Peters5b8132f2003-01-31 15:52:05 +0000529 struct triple {
Tim Petersbaefd9e2003-01-28 20:37:45 +0000530 long input;
Tim Peters5b8132f2003-01-31 15:52:05 +0000531 size_t nbits;
532 int sign;
533 } testcases[] = {{0, 0, 0},
534 {1L, 1, 1},
535 {-1L, 1, -1},
536 {2L, 2, 1},
537 {-2L, 2, -1},
538 {3L, 2, 1},
539 {-3L, 2, -1},
540 {4L, 3, 1},
541 {-4L, 3, -1},
542 {0x7fffL, 15, 1}, /* one Python long digit */
543 {-0x7fffL, 15, -1},
544 {0xffffL, 16, 1},
545 {-0xffffL, 16, -1},
546 {0xfffffffL, 28, 1},
547 {-0xfffffffL, 28, -1}};
Tim Petersbaefd9e2003-01-28 20:37:45 +0000548 int i;
549
Tim Peters5b8132f2003-01-31 15:52:05 +0000550 for (i = 0; i < sizeof(testcases) / sizeof(struct triple); ++i) {
551 PyObject *plong = PyLong_FromLong(testcases[i].input);
Tim Petersbaefd9e2003-01-28 20:37:45 +0000552 size_t nbits = _PyLong_NumBits(plong);
Tim Peters5b8132f2003-01-31 15:52:05 +0000553 int sign = _PyLong_Sign(plong);
Tim Petersbaefd9e2003-01-28 20:37:45 +0000554
555 Py_DECREF(plong);
Tim Peters5b8132f2003-01-31 15:52:05 +0000556 if (nbits != testcases[i].nbits)
Tim Petersbaefd9e2003-01-28 20:37:45 +0000557 return raiseTestError("test_long_numbits",
Tim Peters5b8132f2003-01-31 15:52:05 +0000558 "wrong result for _PyLong_NumBits");
559 if (sign != testcases[i].sign)
560 return raiseTestError("test_long_numbits",
561 "wrong result for _PyLong_Sign");
Tim Petersbaefd9e2003-01-28 20:37:45 +0000562 }
563 Py_INCREF(Py_None);
564 return Py_None;
565}
566
Neal Norwitz4a53dad2006-03-15 05:43:10 +0000567/* Example passing NULLs to PyObject_Str(NULL) and PyObject_Unicode(NULL). */
568
569static PyObject *
570test_null_strings(PyObject *self)
571{
572 PyObject *o1 = PyObject_Str(NULL), *o2 = PyObject_Unicode(NULL);
573 PyObject *tuple = PyTuple_Pack(2, o1, o2);
574 Py_XDECREF(o1);
575 Py_XDECREF(o2);
576 return tuple;
577}
578
Jeremy Hyltonede049b2001-09-26 20:01:13 +0000579static PyObject *
580raise_exception(PyObject *self, PyObject *args)
581{
582 PyObject *exc;
583 PyObject *exc_args, *v;
584 int num_args, i;
585
586 if (!PyArg_ParseTuple(args, "Oi:raise_exception",
587 &exc, &num_args))
588 return NULL;
589
590 exc_args = PyTuple_New(num_args);
591 if (exc_args == NULL)
592 return NULL;
593 for (i = 0; i < num_args; ++i) {
594 v = PyInt_FromLong(i);
595 if (v == NULL) {
596 Py_DECREF(exc_args);
597 return NULL;
598 }
599 PyTuple_SET_ITEM(exc_args, i, v);
600 }
601 PyErr_SetObject(exc, exc_args);
Michael W. Hudsonf02bcee2003-08-15 13:03:30 +0000602 Py_DECREF(exc_args);
Jeremy Hyltonede049b2001-09-26 20:01:13 +0000603 return NULL;
604}
Tim Peters91621db2001-06-12 20:10:01 +0000605
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000606#ifdef WITH_THREAD
607
Tim Peters59b96c12006-03-21 03:58:41 +0000608/* test_thread_state spawns a thread of its own, and that thread releases
609 * `thread_done` when it's finished. The driver code has to know when the
610 * thread finishes, because the thread uses a PyObject (the callable) that
611 * may go away when the driver finishes. The former lack of this explicit
612 * synchronization caused rare segfaults, so rare that they were seen only
613 * on a Mac buildbot (although they were possible on any box).
614 */
615static PyThread_type_lock thread_done = NULL;
616
617static void
618_make_call(void *callable)
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000619{
620 PyObject *rc;
621 PyGILState_STATE s = PyGILState_Ensure();
Martin v. Löwis62e58042006-10-27 06:17:21 +0000622 rc = PyObject_CallFunction((PyObject *)callable, "");
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000623 Py_XDECREF(rc);
624 PyGILState_Release(s);
625}
626
Tim Peters59b96c12006-03-21 03:58:41 +0000627/* Same thing, but releases `thread_done` when it returns. This variant
628 * should be called only from threads spawned by test_thread_state().
629 */
630static void
631_make_call_from_thread(void *callable)
632{
633 _make_call(callable);
634 PyThread_release_lock(thread_done);
635}
636
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000637static PyObject *
638test_thread_state(PyObject *self, PyObject *args)
639{
640 PyObject *fn;
Tim Peters59b96c12006-03-21 03:58:41 +0000641
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000642 if (!PyArg_ParseTuple(args, "O:test_thread_state", &fn))
643 return NULL;
Tim Peters59b96c12006-03-21 03:58:41 +0000644
645 /* Ensure Python is set up for threading */
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000646 PyEval_InitThreads();
Tim Peters59b96c12006-03-21 03:58:41 +0000647 thread_done = PyThread_allocate_lock();
648 if (thread_done == NULL)
649 return PyErr_NoMemory();
650 PyThread_acquire_lock(thread_done, 1);
651
652 /* Start a new thread with our callback. */
653 PyThread_start_new_thread(_make_call_from_thread, fn);
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000654 /* Make the callback with the thread lock held by this thread */
655 _make_call(fn);
656 /* Do it all again, but this time with the thread-lock released */
657 Py_BEGIN_ALLOW_THREADS
658 _make_call(fn);
Tim Peters59b96c12006-03-21 03:58:41 +0000659 PyThread_acquire_lock(thread_done, 1); /* wait for thread to finish */
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000660 Py_END_ALLOW_THREADS
Tim Peters59b96c12006-03-21 03:58:41 +0000661
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000662 /* And once more with and without a thread
Tim Peters59b96c12006-03-21 03:58:41 +0000663 XXX - should use a lock and work out exactly what we are trying
664 to test <wink>
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000665 */
666 Py_BEGIN_ALLOW_THREADS
Tim Peters59b96c12006-03-21 03:58:41 +0000667 PyThread_start_new_thread(_make_call_from_thread, fn);
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000668 _make_call(fn);
Tim Peters59b96c12006-03-21 03:58:41 +0000669 PyThread_acquire_lock(thread_done, 1); /* wait for thread to finish */
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000670 Py_END_ALLOW_THREADS
Tim Peters59b96c12006-03-21 03:58:41 +0000671
672 PyThread_free_lock(thread_done);
673 Py_RETURN_NONE;
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000674}
675#endif
676
Tim Peters375f06b2006-05-13 23:33:19 +0000677/* Some tests of PyString_FromFormat(). This needs more tests. */
Tim Peters8931ff12006-05-13 23:28:20 +0000678static PyObject *
679test_string_from_format(PyObject *self, PyObject *args)
680{
681 PyObject *result;
682 char *msg;
683
684#define CHECK_1_FORMAT(FORMAT, TYPE) \
685 result = PyString_FromFormat(FORMAT, (TYPE)1); \
686 if (result == NULL) \
687 return NULL; \
688 if (strcmp(PyString_AsString(result), "1")) { \
689 msg = FORMAT " failed at 1"; \
690 goto Fail; \
691 } \
692 Py_DECREF(result)
693
694 CHECK_1_FORMAT("%d", int);
695 CHECK_1_FORMAT("%ld", long);
696 /* The z width modifier was added in Python 2.5. */
697 CHECK_1_FORMAT("%zd", Py_ssize_t);
698
699 /* The u type code was added in Python 2.5. */
700 CHECK_1_FORMAT("%u", unsigned int);
701 CHECK_1_FORMAT("%lu", unsigned long);
702 CHECK_1_FORMAT("%zu", size_t);
703
704 Py_RETURN_NONE;
705
706 Fail:
707 Py_XDECREF(result);
708 return raiseTestError("test_string_from_format", msg);
709
710#undef CHECK_1_FORMAT
711}
712
Georg Brandle9462c72006-08-04 18:03:37 +0000713/* This is here to provide a docstring for test_descr. */
714static PyObject *
715test_with_docstring(PyObject *self)
716{
717 Py_RETURN_NONE;
718}
719
Tim Peters9ea17ac2001-02-02 05:57:15 +0000720static PyMethodDef TestMethods[] = {
Fred Drakeacee69f2002-04-01 14:28:58 +0000721 {"raise_exception", raise_exception, METH_VARARGS},
722 {"test_config", (PyCFunction)test_config, METH_NOARGS},
723 {"test_list_api", (PyCFunction)test_list_api, METH_NOARGS},
724 {"test_dict_iteration", (PyCFunction)test_dict_iteration,METH_NOARGS},
725 {"test_long_api", (PyCFunction)test_long_api, METH_NOARGS},
Tim Petersbaefd9e2003-01-28 20:37:45 +0000726 {"test_long_numbits", (PyCFunction)test_long_numbits, METH_NOARGS},
Thomas Hellera4ea6032003-04-17 18:55:45 +0000727 {"test_k_code", (PyCFunction)test_k_code, METH_NOARGS},
Neal Norwitz4a53dad2006-03-15 05:43:10 +0000728 {"test_null_strings", (PyCFunction)test_null_strings, METH_NOARGS},
Tim Peters8931ff12006-05-13 23:28:20 +0000729 {"test_string_from_format", (PyCFunction)test_string_from_format, METH_NOARGS},
Georg Brandle9462c72006-08-04 18:03:37 +0000730 {"test_with_docstring", (PyCFunction)test_with_docstring, METH_NOARGS,
731 PyDoc_STR("This is a pretty normal docstring.")},
Thomas Heller3457e4b2003-04-24 16:14:27 +0000732
Georg Brandl5f135782006-07-26 08:03:10 +0000733 {"getargs_tuple", getargs_tuple, METH_VARARGS},
Georg Brandl7f573f72006-04-13 07:59:30 +0000734 {"getargs_b", getargs_b, METH_VARARGS},
735 {"getargs_B", getargs_B, METH_VARARGS},
736 {"getargs_H", getargs_H, METH_VARARGS},
737 {"getargs_I", getargs_I, METH_VARARGS},
738 {"getargs_k", getargs_k, METH_VARARGS},
739 {"getargs_i", getargs_i, METH_VARARGS},
740 {"getargs_l", getargs_l, METH_VARARGS},
741 {"getargs_n", getargs_n, METH_VARARGS},
Tim Peters91621db2001-06-12 20:10:01 +0000742#ifdef HAVE_LONG_LONG
Georg Brandl7f573f72006-04-13 07:59:30 +0000743 {"getargs_L", getargs_L, METH_VARARGS},
744 {"getargs_K", getargs_K, METH_VARARGS},
745 {"test_longlong_api", test_longlong_api, METH_NOARGS},
Fred Drakeacee69f2002-04-01 14:28:58 +0000746 {"test_L_code", (PyCFunction)test_L_code, METH_NOARGS},
Walter Dörwald9ae019b2006-03-18 14:22:26 +0000747 {"codec_incrementalencoder",
748 (PyCFunction)codec_incrementalencoder, METH_VARARGS},
749 {"codec_incrementaldecoder",
750 (PyCFunction)codec_incrementaldecoder, METH_VARARGS},
Tim Peters91621db2001-06-12 20:10:01 +0000751#endif
Marc-André Lemburg3e3eacb2002-01-09 16:21:27 +0000752#ifdef Py_USING_UNICODE
Fred Drakeacee69f2002-04-01 14:28:58 +0000753 {"test_u_code", (PyCFunction)test_u_code, METH_NOARGS},
Marc-André Lemburg3e3eacb2002-01-09 16:21:27 +0000754#endif
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000755#ifdef WITH_THREAD
Georg Brandl7f573f72006-04-13 07:59:30 +0000756 {"_test_thread_state", test_thread_state, METH_VARARGS},
Mark Hammond8d98d2c2003-04-19 15:41:53 +0000757#endif
Tim Peters9ea17ac2001-02-02 05:57:15 +0000758 {NULL, NULL} /* sentinel */
759};
760
Thomas Hellera4ea6032003-04-17 18:55:45 +0000761#define AddSym(d, n, f, v) {PyObject *o = f(v); PyDict_SetItemString(d, n, o); Py_DECREF(o);}
762
Martin v. Löwis62e58042006-10-27 06:17:21 +0000763typedef struct {
764 char byte_member;
765 unsigned char ubyte_member;
766 short short_member;
767 unsigned short ushort_member;
768 int int_member;
769 unsigned int uint_member;
770 long long_member;
771 unsigned long ulong_member;
772 float float_member;
773 double double_member;
774} all_structmembers;
775
776typedef struct {
777 PyObject_HEAD
778 all_structmembers structmembers;
779} test_structmembers;
780
781static struct PyMemberDef test_members[] = {
782 {"T_BYTE", T_BYTE, offsetof(test_structmembers, structmembers.byte_member), 0, NULL},
783 {"T_UBYTE", T_UBYTE, offsetof(test_structmembers, structmembers.ubyte_member), 0, NULL},
784 {"T_SHORT", T_SHORT, offsetof(test_structmembers, structmembers.short_member), 0, NULL},
785 {"T_USHORT", T_USHORT, offsetof(test_structmembers, structmembers.ushort_member), 0, NULL},
786 {"T_INT", T_INT, offsetof(test_structmembers, structmembers.int_member), 0, NULL},
787 {"T_UINT", T_UINT, offsetof(test_structmembers, structmembers.uint_member), 0, NULL},
788 {"T_LONG", T_LONG, offsetof(test_structmembers, structmembers.long_member), 0, NULL},
789 {"T_ULONG", T_ULONG, offsetof(test_structmembers, structmembers.ulong_member), 0, NULL},
790 {"T_FLOAT", T_FLOAT, offsetof(test_structmembers, structmembers.float_member), 0, NULL},
791 {"T_DOUBLE", T_DOUBLE, offsetof(test_structmembers, structmembers.double_member), 0, NULL},
792 {NULL}
793};
794
795
796static PyObject *test_structmembers_new(PyTypeObject *type, PyObject *args, PyObject *kwargs){
797 static char *keywords[]={"T_BYTE", "T_UBYTE", "T_SHORT", "T_USHORT", "T_INT", "T_UINT",
798 "T_LONG", "T_ULONG", "T_FLOAT", "T_DOUBLE", NULL};
799 test_structmembers *ob=PyObject_New(test_structmembers, type);
800 if (ob==NULL)
801 return NULL;
802 memset(&ob->structmembers, 0, sizeof(all_structmembers));
803 if (!PyArg_ParseTupleAndKeywords(args, kwargs, "|bBhHiIlkfd", keywords,
804 &ob->structmembers.byte_member, &ob->structmembers.ubyte_member,
805 &ob->structmembers.short_member, &ob->structmembers.ushort_member,
806 &ob->structmembers.int_member, &ob->structmembers.uint_member,
807 &ob->structmembers.long_member, &ob->structmembers.ulong_member,
808 &ob->structmembers.float_member, &ob->structmembers.double_member)){
809 Py_DECREF(ob);
810 return NULL;
811 }
812 return (PyObject *)ob;
813}
814
815static void test_structmembers_free(PyObject *ob){
816 PyObject_FREE(ob);
817}
818
819static PyTypeObject test_structmembersType = {
820 PyObject_HEAD_INIT(NULL)
821 0,
822 "test_structmembersType",
823 sizeof(test_structmembers), /* tp_basicsize */
824 0, /* tp_itemsize */
825 test_structmembers_free, /* destructor tp_dealloc */
826 0, /* tp_print */
827 0, /* tp_getattr */
828 0, /* tp_setattr */
829 0, /* tp_compare */
830 0, /* tp_repr */
831 0, /* tp_as_number */
832 0, /* tp_as_sequence */
833 0, /* tp_as_mapping */
834 0, /* tp_hash */
835 0, /* tp_call */
836 0, /* tp_str */
837 PyObject_GenericGetAttr,
838 PyObject_GenericSetAttr,
839 0, /* tp_as_buffer */
840 0, /* tp_flags */
841 "Type containing all structmember types",
842 0, /* traverseproc tp_traverse */
843 0, /* tp_clear */
844 0, /* tp_richcompare */
845 0, /* tp_weaklistoffset */
846 0, /* tp_iter */
847 0, /* tp_iternext */
848 0, /* tp_methods */
849 test_members, /* tp_members */
850 0,
851 0,
852 0,
853 0,
854 0,
855 0,
856 0,
857 0,
858 test_structmembers_new, /* tp_new */
859};
860
861
Mark Hammond62b1ab12002-07-23 06:31:15 +0000862PyMODINIT_FUNC
Tim Petersd66595f2001-02-04 03:09:53 +0000863init_testcapi(void)
Tim Peters9ea17ac2001-02-02 05:57:15 +0000864{
Fred Drakeacee69f2002-04-01 14:28:58 +0000865 PyObject *m;
Tim Peters9ea17ac2001-02-02 05:57:15 +0000866
Tim Petersd66595f2001-02-04 03:09:53 +0000867 m = Py_InitModule("_testcapi", TestMethods);
Neal Norwitz1ac754f2006-01-19 06:09:39 +0000868 if (m == NULL)
869 return;
Tim Peters9ea17ac2001-02-02 05:57:15 +0000870
Martin v. Löwis62e58042006-10-27 06:17:21 +0000871 test_structmembersType.ob_type=&PyType_Type;
872 Py_INCREF(&test_structmembersType);
873 PyModule_AddObject(m, "test_structmembersType", (PyObject *)&test_structmembersType);
874
875 PyModule_AddObject(m, "CHAR_MAX", PyInt_FromLong(CHAR_MAX));
876 PyModule_AddObject(m, "CHAR_MIN", PyInt_FromLong(CHAR_MIN));
Thomas Hellera4ea6032003-04-17 18:55:45 +0000877 PyModule_AddObject(m, "UCHAR_MAX", PyInt_FromLong(UCHAR_MAX));
Martin v. Löwis62e58042006-10-27 06:17:21 +0000878 PyModule_AddObject(m, "SHRT_MAX", PyInt_FromLong(SHRT_MAX));
879 PyModule_AddObject(m, "SHRT_MIN", PyInt_FromLong(SHRT_MIN));
Thomas Hellera4ea6032003-04-17 18:55:45 +0000880 PyModule_AddObject(m, "USHRT_MAX", PyInt_FromLong(USHRT_MAX));
Martin v. Löwis62e58042006-10-27 06:17:21 +0000881 PyModule_AddObject(m, "INT_MAX", PyLong_FromLong(INT_MAX));
882 PyModule_AddObject(m, "INT_MIN", PyLong_FromLong(INT_MIN));
Thomas Hellera4ea6032003-04-17 18:55:45 +0000883 PyModule_AddObject(m, "UINT_MAX", PyLong_FromUnsignedLong(UINT_MAX));
Thomas Hellera4ea6032003-04-17 18:55:45 +0000884 PyModule_AddObject(m, "LONG_MAX", PyInt_FromLong(LONG_MAX));
Martin v. Löwis62e58042006-10-27 06:17:21 +0000885 PyModule_AddObject(m, "LONG_MIN", PyInt_FromLong(LONG_MIN));
886 PyModule_AddObject(m, "ULONG_MAX", PyLong_FromUnsignedLong(ULONG_MAX));
887 PyModule_AddObject(m, "FLT_MAX", PyFloat_FromDouble(FLT_MAX));
888 PyModule_AddObject(m, "FLT_MIN", PyFloat_FromDouble(FLT_MIN));
889 PyModule_AddObject(m, "DBL_MAX", PyFloat_FromDouble(DBL_MAX));
890 PyModule_AddObject(m, "DBL_MIN", PyFloat_FromDouble(DBL_MIN));
Georg Brandl635af322006-04-13 07:29:18 +0000891 PyModule_AddObject(m, "PY_SSIZE_T_MAX", PyInt_FromSsize_t(PY_SSIZE_T_MAX));
Martin v. Löwis62e58042006-10-27 06:17:21 +0000892 PyModule_AddObject(m, "PY_SSIZE_T_MIN", PyInt_FromSsize_t(PY_SSIZE_T_MIN));
Thomas Hellera4ea6032003-04-17 18:55:45 +0000893
Tim Petersd66595f2001-02-04 03:09:53 +0000894 TestError = PyErr_NewException("_testcapi.error", NULL, NULL);
Fred Drakeacee69f2002-04-01 14:28:58 +0000895 Py_INCREF(TestError);
896 PyModule_AddObject(m, "error", TestError);
Tim Peters9ea17ac2001-02-02 05:57:15 +0000897}