blob: 95612851b04ff8474ae50b94b2dd5d5f68a9f719 [file] [log] [blame]
Tim Peters7d3a5112000-07-08 04:17:21 +00001#ifndef Py_PYPORT_H
Vladimir Marangozov14a4d882000-07-10 04:59:49 +00002#define Py_PYPORT_H
Tim Peters7d3a5112000-07-08 04:17:21 +00003
Martin v. Löwis4f1cd8b2001-07-26 13:41:06 +00004#include "pyconfig.h" /* include for defines */
Peter Schneider-Kamp25f68942000-07-31 22:19:30 +00005
Mark Dickinson835a6c82009-06-30 15:45:17 +00006/* Some versions of HP-UX & Solaris need inttypes.h for int32_t,
7 INT32_MAX, etc. */
8#ifdef HAVE_INTTYPES_H
9#include <inttypes.h>
10#endif
11
Thomas Wouters89f507f2006-12-13 04:49:30 +000012#ifdef HAVE_STDINT_H
13#include <stdint.h>
14#endif
15
Tim Peters7d3a5112000-07-08 04:17:21 +000016/**************************************************************************
17Symbols and macros to supply platform-independent interfaces to basic
Tim Peters1be46842000-07-23 18:10:18 +000018C language & library operations whose spellings vary across platforms.
Tim Peters7d3a5112000-07-08 04:17:21 +000019
20Please try to make documentation here as clear as possible: by definition,
21the stuff here is trying to illuminate C's darkest corners.
22
23Config #defines referenced here:
24
25SIGNED_RIGHT_SHIFT_ZERO_FILLS
26Meaning: To be defined iff i>>j does not extend the sign bit when i is a
27 signed integral type and i < 0.
28Used in: Py_ARITHMETIC_RIGHT_SHIFT
Tim Peters1be46842000-07-23 18:10:18 +000029
Tim Peters8315ea52000-07-23 19:28:35 +000030Py_DEBUG
31Meaning: Extra checks compiled in for debug mode.
32Used in: Py_SAFE_DOWNCAST
Barry Warsawfd847b22000-08-18 04:48:18 +000033
34HAVE_UINTPTR_T
35Meaning: The C9X type uintptr_t is supported by the compiler
36Used in: Py_uintptr_t
37
38HAVE_LONG_LONG
39Meaning: The compiler supports the C type "long long"
Martin v. Löwisb9a0f912003-03-29 10:06:18 +000040Used in: PY_LONG_LONG
Barry Warsawfd847b22000-08-18 04:48:18 +000041
Tim Peters7d3a5112000-07-08 04:17:21 +000042**************************************************************************/
43
Barry Warsawfd847b22000-08-18 04:48:18 +000044/* typedefs for some C9X-defined synonyms for integral types.
45 *
46 * The names in Python are exactly the same as the C9X names, except with a
47 * Py_ prefix. Until C9X is universally implemented, this is the only way
48 * to ensure that Python gets reliable names that don't conflict with names
49 * in non-Python code that are playing their own tricks to define the C9X
50 * names.
51 *
52 * NOTE: don't go nuts here! Python has no use for *most* of the C9X
53 * integral synonyms. Only define the ones we actually need.
54 */
55
56#ifdef HAVE_LONG_LONG
Martin v. Löwisb9a0f912003-03-29 10:06:18 +000057#ifndef PY_LONG_LONG
58#define PY_LONG_LONG long long
Guido van Rossumcd16bf62007-06-13 18:07:49 +000059#if defined(LLONG_MAX)
60/* If LLONG_MAX is defined in limits.h, use that. */
61#define PY_LLONG_MIN LLONG_MIN
62#define PY_LLONG_MAX LLONG_MAX
63#define PY_ULLONG_MAX ULLONG_MAX
64#elif defined(__LONG_LONG_MAX__)
65/* Otherwise, if GCC has a builtin define, use that. */
66#define PY_LLONG_MAX __LONG_LONG_MAX__
67#define PY_LLONG_MIN (-PY_LLONG_MAX-1)
68#define PY_ULLONG_MAX (__LONG_LONG_MAX__*2ULL + 1ULL)
69#else
70/* Otherwise, rely on two's complement. */
71#define PY_ULLONG_MAX (~0ULL)
72#define PY_LLONG_MAX ((long long)(PY_ULLONG_MAX>>1))
73#define PY_LLONG_MIN (-PY_LLONG_MAX-1)
74#endif /* LLONG_MAX */
Barry Warsawfd847b22000-08-18 04:48:18 +000075#endif
76#endif /* HAVE_LONG_LONG */
77
Mark Dickinsonbd792642009-03-18 20:06:12 +000078/* a build with 30-bit digits for Python long integers needs an exact-width
79 * 32-bit unsigned integer type to store those digits. (We could just use
80 * type 'unsigned long', but that would be wasteful on a system where longs
81 * are 64-bits.) On Unix systems, the autoconf macro AC_TYPE_UINT32_T defines
82 * uint32_t to be such a type unless stdint.h or inttypes.h defines uint32_t.
83 * However, it doesn't set HAVE_UINT32_T, so we do that here.
84 */
85#if (defined UINT32_MAX || defined uint32_t)
86#ifndef PY_UINT32_T
87#define HAVE_UINT32_T 1
88#define PY_UINT32_T uint32_t
89#endif
90#endif
91
92/* Macros for a 64-bit unsigned integer type; used for type 'twodigits' in the
93 * long integer implementation, when 30-bit digits are enabled.
94 */
95#if (defined UINT64_MAX || defined uint64_t)
96#ifndef PY_UINT64_T
97#define HAVE_UINT64_T 1
98#define PY_UINT64_T uint64_t
99#endif
100#endif
101
102/* Signed variants of the above */
103#if (defined INT32_MAX || defined int32_t)
104#ifndef PY_INT32_T
105#define HAVE_INT32_T 1
106#define PY_INT32_T int32_t
107#endif
108#endif
109#if (defined INT64_MAX || defined int64_t)
110#ifndef PY_INT64_T
111#define HAVE_INT64_T 1
112#define PY_INT64_T int64_t
113#endif
114#endif
115
116/* If PYLONG_BITS_IN_DIGIT is not defined then we'll use 30-bit digits if all
117 the necessary integer types are available, and we're on a 64-bit platform
118 (as determined by SIZEOF_VOID_P); otherwise we use 15-bit digits. */
119
120#ifndef PYLONG_BITS_IN_DIGIT
121#if (defined HAVE_UINT64_T && defined HAVE_INT64_T && \
122 defined HAVE_UINT32_T && defined HAVE_INT32_T && SIZEOF_VOID_P >= 8)
123#define PYLONG_BITS_IN_DIGIT 30
124#else
125#define PYLONG_BITS_IN_DIGIT 15
126#endif
127#endif
128
Mark Dickinsondc787d22010-05-23 13:33:13 +0000129/* Parameters used for the numeric hash implementation. See notes for
130 _PyHash_Double in Objects/object.c. Numeric hashes are based on
131 reduction modulo the prime 2**_PyHASH_BITS - 1. */
132
133#if SIZEOF_LONG >= 8
134#define _PyHASH_BITS 61
135#else
136#define _PyHASH_BITS 31
137#endif
138#define _PyHASH_MODULUS ((1UL << _PyHASH_BITS) - 1)
139#define _PyHASH_INF 314159
140#define _PyHASH_NAN 0
141#define _PyHASH_IMAG 1000003UL
142
Barry Warsawfd847b22000-08-18 04:48:18 +0000143/* uintptr_t is the C9X name for an unsigned integral type such that a
144 * legitimate void* can be cast to uintptr_t and then back to void* again
Tim Peters79248aa2001-08-29 21:37:10 +0000145 * without loss of information. Similarly for intptr_t, wrt a signed
146 * integral type.
Barry Warsawfd847b22000-08-18 04:48:18 +0000147 */
148#ifdef HAVE_UINTPTR_T
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000149typedef uintptr_t Py_uintptr_t;
150typedef intptr_t Py_intptr_t;
Tim Peters79248aa2001-08-29 21:37:10 +0000151
Barry Warsawfd847b22000-08-18 04:48:18 +0000152#elif SIZEOF_VOID_P <= SIZEOF_INT
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000153typedef unsigned int Py_uintptr_t;
154typedef int Py_intptr_t;
Tim Peters79248aa2001-08-29 21:37:10 +0000155
Barry Warsawfd847b22000-08-18 04:48:18 +0000156#elif SIZEOF_VOID_P <= SIZEOF_LONG
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000157typedef unsigned long Py_uintptr_t;
158typedef long Py_intptr_t;
Tim Peters79248aa2001-08-29 21:37:10 +0000159
Barry Warsawfd847b22000-08-18 04:48:18 +0000160#elif defined(HAVE_LONG_LONG) && (SIZEOF_VOID_P <= SIZEOF_LONG_LONG)
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000161typedef unsigned PY_LONG_LONG Py_uintptr_t;
162typedef PY_LONG_LONG Py_intptr_t;
Tim Peters79248aa2001-08-29 21:37:10 +0000163
Barry Warsawfd847b22000-08-18 04:48:18 +0000164#else
165# error "Python needs a typedef for Py_uintptr_t in pyport.h."
166#endif /* HAVE_UINTPTR_T */
167
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000168/* Py_ssize_t is a signed integral type such that sizeof(Py_ssize_t) ==
169 * sizeof(size_t). C99 doesn't define such a thing directly (size_t is an
170 * unsigned integral type). See PEP 353 for details.
171 */
Martin v. Löwis18e16552006-02-15 17:27:45 +0000172#ifdef HAVE_SSIZE_T
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000173typedef ssize_t Py_ssize_t;
Martin v. Löwis18e16552006-02-15 17:27:45 +0000174#elif SIZEOF_VOID_P == SIZEOF_SIZE_T
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000175typedef Py_intptr_t Py_ssize_t;
Martin v. Löwis18e16552006-02-15 17:27:45 +0000176#else
177# error "Python needs a typedef for Py_ssize_t in pyport.h."
178#endif
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000179
Amaury Forgeot d'Arc9c74b142008-06-18 00:47:36 +0000180/* Largest possible value of size_t.
181 SIZE_MAX is part of C99, so it might be defined on some
182 platforms. If it is not defined, (size_t)-1 is a portable
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000183 definition for C89, due to the way signed->unsigned
Amaury Forgeot d'Arc9c74b142008-06-18 00:47:36 +0000184 conversion is defined. */
185#ifdef SIZE_MAX
186#define PY_SIZE_MAX SIZE_MAX
187#else
188#define PY_SIZE_MAX ((size_t)-1)
189#endif
190
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000191/* Largest positive value of type Py_ssize_t. */
Martin v. Löwis18e16552006-02-15 17:27:45 +0000192#define PY_SSIZE_T_MAX ((Py_ssize_t)(((size_t)-1)>>1))
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000193/* Smallest negative value of type Py_ssize_t. */
194#define PY_SSIZE_T_MIN (-PY_SSIZE_T_MAX-1)
195
Christian Heimes400adb02008-02-01 08:12:03 +0000196#if SIZEOF_PID_T > SIZEOF_LONG
197# error "Python doesn't support sizeof(pid_t) > sizeof(long)"
198#endif
199
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000200/* PY_FORMAT_SIZE_T is a platform-specific modifier for use in a printf
201 * format to convert an argument with the width of a size_t or Py_ssize_t.
202 * C99 introduced "z" for this purpose, but not all platforms support that;
203 * e.g., MS compilers use "I" instead.
204 *
205 * These "high level" Python format functions interpret "z" correctly on
206 * all platforms (Python interprets the format string itself, and does whatever
207 * the platform C requires to convert a size_t/Py_ssize_t argument):
208 *
Christian Heimes72b710a2008-05-26 13:28:38 +0000209 * PyBytes_FromFormat
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000210 * PyErr_Format
Christian Heimes72b710a2008-05-26 13:28:38 +0000211 * PyBytes_FromFormatV
Walter Dörwald7696ed72007-05-31 15:51:35 +0000212 * PyUnicode_FromFormatV
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000213 *
214 * Lower-level uses require that you interpolate the correct format modifier
215 * yourself (e.g., calling printf, fprintf, sprintf, PyOS_snprintf); for
216 * example,
217 *
218 * Py_ssize_t index;
219 * fprintf(stderr, "index %" PY_FORMAT_SIZE_T "d sucks\n", index);
220 *
221 * That will expand to %ld, or %Id, or to something else correct for a
222 * Py_ssize_t on the platform.
223 */
224#ifndef PY_FORMAT_SIZE_T
Thomas Wouters89f507f2006-12-13 04:49:30 +0000225# if SIZEOF_SIZE_T == SIZEOF_INT && !defined(__APPLE__)
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000226# define PY_FORMAT_SIZE_T ""
227# elif SIZEOF_SIZE_T == SIZEOF_LONG
228# define PY_FORMAT_SIZE_T "l"
229# elif defined(MS_WINDOWS)
230# define PY_FORMAT_SIZE_T "I"
231# else
232# error "This platform's pyconfig.h needs to define PY_FORMAT_SIZE_T"
233# endif
234#endif
Martin v. Löwis18e16552006-02-15 17:27:45 +0000235
Mark Dickinson6ce4a9a2009-11-16 17:00:11 +0000236/* PY_FORMAT_LONG_LONG is analogous to PY_FORMAT_SIZE_T above, but for
237 * the long long type instead of the size_t type. It's only available
238 * when HAVE_LONG_LONG is defined. The "high level" Python format
239 * functions listed above will interpret "lld" or "llu" correctly on
240 * all platforms.
241 */
242#ifdef HAVE_LONG_LONG
243# ifndef PY_FORMAT_LONG_LONG
244# if defined(MS_WIN64) || defined(MS_WINDOWS)
245# define PY_FORMAT_LONG_LONG "I64"
246# else
247# error "This platform's pyconfig.h needs to define PY_FORMAT_LONG_LONG"
248# endif
249# endif
250#endif
251
Thomas Wouters477c8d52006-05-27 19:21:47 +0000252/* Py_LOCAL can be used instead of static to get the fastest possible calling
253 * convention for functions that are local to a given module.
254 *
255 * Py_LOCAL_INLINE does the same thing, and also explicitly requests inlining,
256 * for platforms that support that.
257 *
258 * If PY_LOCAL_AGGRESSIVE is defined before python.h is included, more
259 * "aggressive" inlining/optimizaion is enabled for the entire module. This
260 * may lead to code bloat, and may slow things down for those reasons. It may
261 * also lead to errors, if the code relies on pointer aliasing. Use with
262 * care.
263 *
264 * NOTE: You can only use this for functions that are entirely local to a
265 * module; functions that are exported via method tables, callbacks, etc,
266 * should keep using static.
267 */
268
269#undef USE_INLINE /* XXX - set via configure? */
270
271#if defined(_MSC_VER)
272#if defined(PY_LOCAL_AGGRESSIVE)
273/* enable more aggressive optimization for visual studio */
274#pragma optimize("agtw", on)
275#endif
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000276/* ignore warnings if the compiler decides not to inline a function */
Thomas Wouters477c8d52006-05-27 19:21:47 +0000277#pragma warning(disable: 4710)
278/* fastest possible local call under MSVC */
279#define Py_LOCAL(type) static type __fastcall
280#define Py_LOCAL_INLINE(type) static __inline type __fastcall
281#elif defined(USE_INLINE)
282#define Py_LOCAL(type) static type
283#define Py_LOCAL_INLINE(type) static inline type
284#else
285#define Py_LOCAL(type) static type
286#define Py_LOCAL_INLINE(type) static type
287#endif
288
Thomas Wouters4d70c3d2006-06-08 14:42:34 +0000289/* Py_MEMCPY can be used instead of memcpy in cases where the copied blocks
290 * are often very short. While most platforms have highly optimized code for
291 * large transfers, the setup costs for memcpy are often quite high. MEMCPY
292 * solves this by doing short copies "in line".
293 */
294
295#if defined(_MSC_VER)
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000296#define Py_MEMCPY(target, source, length) do { \
297 size_t i_, n_ = (length); \
298 char *t_ = (void*) (target); \
299 const char *s_ = (void*) (source); \
300 if (n_ >= 16) \
301 memcpy(t_, s_, n_); \
302 else \
303 for (i_ = 0; i_ < n_; i_++) \
304 t_[i_] = s_[i_]; \
305 } while (0)
Thomas Wouters4d70c3d2006-06-08 14:42:34 +0000306#else
307#define Py_MEMCPY memcpy
308#endif
309
Peter Schneider-Kamp7e018902000-07-31 15:28:04 +0000310#include <stdlib.h>
Peter Schneider-Kamp7e018902000-07-31 15:28:04 +0000311
Mark Dickinsona4962cb2009-11-28 12:35:42 +0000312#ifdef HAVE_IEEEFP_H
313#include <ieeefp.h> /* needed for 'finite' declaration on some platforms */
314#endif
315
Vladimir Marangozov2c57e072000-08-11 11:48:33 +0000316#include <math.h> /* Moved here from the math section, before extern "C" */
317
318/********************************************
319 * WRAPPER FOR <time.h> and/or <sys/time.h> *
320 ********************************************/
321
322#ifdef TIME_WITH_SYS_TIME
323#include <sys/time.h>
324#include <time.h>
325#else /* !TIME_WITH_SYS_TIME */
326#ifdef HAVE_SYS_TIME_H
327#include <sys/time.h>
328#else /* !HAVE_SYS_TIME_H */
329#include <time.h>
330#endif /* !HAVE_SYS_TIME_H */
331#endif /* !TIME_WITH_SYS_TIME */
332
333
334/******************************
335 * WRAPPER FOR <sys/select.h> *
336 ******************************/
337
338/* NB caller must include <sys/types.h> */
339
340#ifdef HAVE_SYS_SELECT_H
Vladimir Marangozov2c57e072000-08-11 11:48:33 +0000341#include <sys/select.h>
Vladimir Marangozov2c57e072000-08-11 11:48:33 +0000342#endif /* !HAVE_SYS_SELECT_H */
343
Tim Peters60f42b52001-01-18 03:03:16 +0000344/*******************************
345 * stat() and fstat() fiddling *
346 *******************************/
347
348/* We expect that stat and fstat exist on most systems.
349 * It's confirmed on Unix, Mac and Windows.
350 * If you don't have them, add
351 * #define DONT_HAVE_STAT
352 * and/or
353 * #define DONT_HAVE_FSTAT
Tim Peters76f373d2001-07-26 21:34:59 +0000354 * to your pyconfig.h. Python code beyond this should check HAVE_STAT and
Tim Peters60f42b52001-01-18 03:03:16 +0000355 * HAVE_FSTAT instead.
356 * Also
Thomas Wouters0e3f5912006-08-11 14:57:12 +0000357 * #define HAVE_SYS_STAT_H
358 * if <sys/stat.h> exists on your platform, and
Tim Peters60f42b52001-01-18 03:03:16 +0000359 * #define HAVE_STAT_H
Thomas Wouters0e3f5912006-08-11 14:57:12 +0000360 * if <stat.h> does.
Tim Peters60f42b52001-01-18 03:03:16 +0000361 */
362#ifndef DONT_HAVE_STAT
363#define HAVE_STAT
364#endif
365
366#ifndef DONT_HAVE_FSTAT
367#define HAVE_FSTAT
368#endif
369
Thomas Wouters0e3f5912006-08-11 14:57:12 +0000370#ifdef HAVE_SYS_STAT_H
Andrew MacIntyre5e090fc2002-02-26 11:20:01 +0000371#if defined(PYOS_OS2) && defined(PYCC_GCC)
372#include <sys/types.h>
373#endif
Tim Peters60f42b52001-01-18 03:03:16 +0000374#include <sys/stat.h>
375#elif defined(HAVE_STAT_H)
376#include <stat.h>
377#endif
378
Martin v. Löwisf9836ba2001-08-08 10:28:06 +0000379#if defined(PYCC_VACPP)
380/* VisualAge C/C++ Failed to Define MountType Field in sys/stat.h */
381#define S_IFMT (S_IFDIR|S_IFCHR|S_IFREG)
382#endif
383
384#ifndef S_ISREG
385#define S_ISREG(x) (((x) & S_IFMT) == S_IFREG)
386#endif
387
388#ifndef S_ISDIR
389#define S_ISDIR(x) (((x) & S_IFMT) == S_IFDIR)
390#endif
391
Vladimir Marangozov2c57e072000-08-11 11:48:33 +0000392
Tim Peters7d3a5112000-07-08 04:17:21 +0000393#ifdef __cplusplus
Peter Schneider-Kamp7e018902000-07-31 15:28:04 +0000394/* Move this down here since some C++ #include's don't like to be included
395 inside an extern "C" */
Tim Peters7d3a5112000-07-08 04:17:21 +0000396extern "C" {
397#endif
398
Vladimir Marangozov2c57e072000-08-11 11:48:33 +0000399
Tim Peters7d3a5112000-07-08 04:17:21 +0000400/* Py_ARITHMETIC_RIGHT_SHIFT
401 * C doesn't define whether a right-shift of a signed integer sign-extends
402 * or zero-fills. Here a macro to force sign extension:
403 * Py_ARITHMETIC_RIGHT_SHIFT(TYPE, I, J)
Mark Dickinson16f966e2009-03-20 23:23:15 +0000404 * Return I >> J, forcing sign extension. Arithmetically, return the
405 * floor of I/2**J.
Tim Peters7d3a5112000-07-08 04:17:21 +0000406 * Requirements:
Mark Dickinson16f966e2009-03-20 23:23:15 +0000407 * I should have signed integer type. In the terminology of C99, this can
408 * be either one of the five standard signed integer types (signed char,
409 * short, int, long, long long) or an extended signed integer type.
410 * J is an integer >= 0 and strictly less than the number of bits in the
411 * type of I (because C doesn't define what happens for J outside that
412 * range either).
413 * TYPE used to specify the type of I, but is now ignored. It's been left
414 * in for backwards compatibility with versions <= 2.6 or 3.0.
Tim Peters7d3a5112000-07-08 04:17:21 +0000415 * Caution:
416 * I may be evaluated more than once.
417 */
418#ifdef SIGNED_RIGHT_SHIFT_ZERO_FILLS
419#define Py_ARITHMETIC_RIGHT_SHIFT(TYPE, I, J) \
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000420 ((I) < 0 ? -1-((-1-(I)) >> (J)) : (I) >> (J))
Tim Peters7d3a5112000-07-08 04:17:21 +0000421#else
422#define Py_ARITHMETIC_RIGHT_SHIFT(TYPE, I, J) ((I) >> (J))
423#endif
424
Tim Peters39dce292000-08-15 03:34:48 +0000425/* Py_FORCE_EXPANSION(X)
Tim Peters1be46842000-07-23 18:10:18 +0000426 * "Simply" returns its argument. However, macro expansions within the
427 * argument are evaluated. This unfortunate trickery is needed to get
428 * token-pasting to work as desired in some cases.
429 */
430#define Py_FORCE_EXPANSION(X) X
431
Tim Peters8315ea52000-07-23 19:28:35 +0000432/* Py_SAFE_DOWNCAST(VALUE, WIDE, NARROW)
433 * Cast VALUE to type NARROW from type WIDE. In Py_DEBUG mode, this
434 * assert-fails if any information is lost.
435 * Caution:
436 * VALUE may be evaluated more than once.
437 */
438#ifdef Py_DEBUG
439#define Py_SAFE_DOWNCAST(VALUE, WIDE, NARROW) \
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000440 (assert((WIDE)(NARROW)(VALUE) == (VALUE)), (NARROW)(VALUE))
Tim Peters8315ea52000-07-23 19:28:35 +0000441#else
442#define Py_SAFE_DOWNCAST(VALUE, WIDE, NARROW) (NARROW)(VALUE)
443#endif
444
Hye-Shik Chang77d9a3e2004-03-22 08:43:55 +0000445/* Py_SET_ERRNO_ON_MATH_ERROR(x)
Tim Petersa40c7932001-09-05 22:36:56 +0000446 * If a libm function did not set errno, but it looks like the result
Hye-Shik Chang77d9a3e2004-03-22 08:43:55 +0000447 * overflowed or not-a-number, set errno to ERANGE or EDOM. Set errno
448 * to 0 before calling a libm function, and invoke this macro after,
449 * passing the function result.
Tim Petersa40c7932001-09-05 22:36:56 +0000450 * Caution:
451 * This isn't reliable. See Py_OVERFLOWED comments.
452 * X is evaluated more than once.
453 */
Guido van Rossum539c6622005-09-14 17:49:54 +0000454#if defined(__FreeBSD__) || defined(__OpenBSD__) || (defined(__hpux) && defined(__ia64))
Hye-Shik Chang77d9a3e2004-03-22 08:43:55 +0000455#define _Py_SET_EDOM_FOR_NAN(X) if (isnan(X)) errno = EDOM;
456#else
457#define _Py_SET_EDOM_FOR_NAN(X) ;
458#endif
459#define Py_SET_ERRNO_ON_MATH_ERROR(X) \
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000460 do { \
461 if (errno == 0) { \
462 if ((X) == Py_HUGE_VAL || (X) == -Py_HUGE_VAL) \
463 errno = ERANGE; \
464 else _Py_SET_EDOM_FOR_NAN(X) \
465 } \
466 } while(0)
Tim Peters57f282a2001-09-05 05:38:10 +0000467
Hye-Shik Chang77d9a3e2004-03-22 08:43:55 +0000468/* Py_SET_ERANGE_ON_OVERFLOW(x)
469 * An alias of Py_SET_ERRNO_ON_MATH_ERROR for backward-compatibility.
470 */
471#define Py_SET_ERANGE_IF_OVERFLOW(X) Py_SET_ERRNO_ON_MATH_ERROR(X)
472
Tim Petersdc5a5082002-03-09 04:58:24 +0000473/* Py_ADJUST_ERANGE1(x)
474 * Py_ADJUST_ERANGE2(x, y)
475 * Set errno to 0 before calling a libm function, and invoke one of these
476 * macros after, passing the function result(s) (Py_ADJUST_ERANGE2 is useful
477 * for functions returning complex results). This makes two kinds of
478 * adjustments to errno: (A) If it looks like the platform libm set
479 * errno=ERANGE due to underflow, clear errno. (B) If it looks like the
480 * platform libm overflowed but didn't set errno, force errno to ERANGE. In
481 * effect, we're trying to force a useful implementation of C89 errno
482 * behavior.
483 * Caution:
484 * This isn't reliable. See Py_OVERFLOWED comments.
485 * X and Y may be evaluated more than once.
486 */
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000487#define Py_ADJUST_ERANGE1(X) \
488 do { \
489 if (errno == 0) { \
490 if ((X) == Py_HUGE_VAL || (X) == -Py_HUGE_VAL) \
491 errno = ERANGE; \
492 } \
493 else if (errno == ERANGE && (X) == 0.0) \
494 errno = 0; \
495 } while(0)
Tim Petersdc5a5082002-03-09 04:58:24 +0000496
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000497#define Py_ADJUST_ERANGE2(X, Y) \
498 do { \
499 if ((X) == Py_HUGE_VAL || (X) == -Py_HUGE_VAL || \
500 (Y) == Py_HUGE_VAL || (Y) == -Py_HUGE_VAL) { \
501 if (errno == 0) \
502 errno = ERANGE; \
503 } \
504 else if (errno == ERANGE) \
505 errno = 0; \
506 } while(0)
Tim Petersdc5a5082002-03-09 04:58:24 +0000507
Mark Dickinsona4262b92009-04-19 11:35:55 +0000508/* The functions _Py_dg_strtod and _Py_dg_dtoa in Python/dtoa.c (which are
509 * required to support the short float repr introduced in Python 3.1) require
510 * that the floating-point unit that's being used for arithmetic operations
511 * on C doubles is set to use 53-bit precision. It also requires that the
512 * FPU rounding mode is round-half-to-even, but that's less often an issue.
513 *
514 * If your FPU isn't already set to 53-bit precision/round-half-to-even, and
515 * you want to make use of _Py_dg_strtod and _Py_dg_dtoa, then you should
516 *
517 * #define HAVE_PY_SET_53BIT_PRECISION 1
518 *
519 * and also give appropriate definitions for the following three macros:
520 *
521 * _PY_SET_53BIT_PRECISION_START : store original FPU settings, and
522 * set FPU to 53-bit precision/round-half-to-even
523 * _PY_SET_53BIT_PRECISION_END : restore original FPU settings
524 * _PY_SET_53BIT_PRECISION_HEADER : any variable declarations needed to
525 * use the two macros above.
526 *
527 * The macros are designed to be used within a single C function: see
528 * Python/pystrtod.c for an example of their use.
529 */
Mark Dickinsonb08a53a2009-04-16 19:52:09 +0000530
Mark Dickinsona4262b92009-04-19 11:35:55 +0000531/* get and set x87 control word for gcc/x86 */
Mark Dickinson7abf8d42009-04-18 20:17:52 +0000532#ifdef HAVE_GCC_ASM_FOR_X87
Mark Dickinsona4262b92009-04-19 11:35:55 +0000533#define HAVE_PY_SET_53BIT_PRECISION 1
534/* _Py_get/set_387controlword functions are defined in Python/pymath.c */
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000535#define _Py_SET_53BIT_PRECISION_HEADER \
536 unsigned short old_387controlword, new_387controlword
537#define _Py_SET_53BIT_PRECISION_START \
538 do { \
539 old_387controlword = _Py_get_387controlword(); \
540 new_387controlword = (old_387controlword & ~0x0f00) | 0x0200; \
541 if (new_387controlword != old_387controlword) \
542 _Py_set_387controlword(new_387controlword); \
543 } while (0)
544#define _Py_SET_53BIT_PRECISION_END \
545 if (new_387controlword != old_387controlword) \
546 _Py_set_387controlword(old_387controlword)
Mark Dickinsona4262b92009-04-19 11:35:55 +0000547#endif
548
549/* default definitions are empty */
550#ifndef HAVE_PY_SET_53BIT_PRECISION
Mark Dickinsonb08a53a2009-04-16 19:52:09 +0000551#define _Py_SET_53BIT_PRECISION_HEADER
552#define _Py_SET_53BIT_PRECISION_START
553#define _Py_SET_53BIT_PRECISION_END
554#endif
555
556/* If we can't guarantee 53-bit precision, don't use the code
557 in Python/dtoa.c, but fall back to standard code. This
558 means that repr of a float will be long (17 sig digits).
559
560 Realistically, there are two things that could go wrong:
561
562 (1) doubles aren't IEEE 754 doubles, or
563 (2) we're on x86 with the rounding precision set to 64-bits
564 (extended precision), and we don't know how to change
565 the rounding precision.
566 */
567
568#if !defined(DOUBLE_IS_LITTLE_ENDIAN_IEEE754) && \
569 !defined(DOUBLE_IS_BIG_ENDIAN_IEEE754) && \
570 !defined(DOUBLE_IS_ARM_MIXED_ENDIAN_IEEE754)
571#define PY_NO_SHORT_FLOAT_REPR
572#endif
573
Mark Dickinson60fd0992009-04-18 10:16:35 +0000574/* double rounding is symptomatic of use of extended precision on x86. If
575 we're seeing double rounding, and we don't have any mechanism available for
576 changing the FPU rounding precision, then don't use Python/dtoa.c. */
Mark Dickinsona4262b92009-04-19 11:35:55 +0000577#if defined(X87_DOUBLE_ROUNDING) && !defined(HAVE_PY_SET_53BIT_PRECISION)
Mark Dickinsonb08a53a2009-04-16 19:52:09 +0000578#define PY_NO_SHORT_FLOAT_REPR
579#endif
580
581
Neal Norwitz80292642002-12-19 15:12:26 +0000582/* Py_DEPRECATED(version)
Neal Norwitz93344ab2002-12-19 15:24:11 +0000583 * Declare a variable, type, or function deprecated.
Neal Norwitz80292642002-12-19 15:12:26 +0000584 * Usage:
585 * extern int old_var Py_DEPRECATED(2.3);
586 * typedef int T1 Py_DEPRECATED(2.4);
587 * extern int x() Py_DEPRECATED(2.5);
588 */
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000589#if defined(__GNUC__) && ((__GNUC__ >= 4) || \
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000590 (__GNUC__ == 3) && (__GNUC_MINOR__ >= 1))
Neal Norwitz80292642002-12-19 15:12:26 +0000591#define Py_DEPRECATED(VERSION_UNUSED) __attribute__((__deprecated__))
592#else
Tim Peters4643bd92002-12-28 21:56:08 +0000593#define Py_DEPRECATED(VERSION_UNUSED)
Neal Norwitz80292642002-12-19 15:12:26 +0000594#endif
595
Thomas Wouters1e0c2f42000-07-24 16:06:23 +0000596/**************************************************************************
597Prototypes that are missing from the standard include files on some systems
598(and possibly only some versions of such systems.)
599
600Please be conservative with adding new ones, document them and enclose them
601in platform-specific #ifdefs.
602**************************************************************************/
603
604#ifdef SOLARIS
605/* Unchecked */
606extern int gethostname(char *, int);
607#endif
608
Thomas Wouters1e0c2f42000-07-24 16:06:23 +0000609#ifdef HAVE__GETPTY
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000610#include <sys/types.h> /* we need to import mode_t */
Thomas Wouters1e0c2f42000-07-24 16:06:23 +0000611extern char * _getpty(int *, int, mode_t, int);
612#endif
613
Georg Brandlf78e02b2008-06-10 17:40:04 +0000614/* On QNX 6, struct termio must be declared by including sys/termio.h
615 if TCGETA, TCSETA, TCSETAW, or TCSETAF are used. sys/termio.h must
616 be included before termios.h or it will generate an error. */
617#ifdef HAVE_SYS_TERMIO_H
618#include <sys/termio.h>
619#endif
620
Thomas Wouters1e0c2f42000-07-24 16:06:23 +0000621#if defined(HAVE_OPENPTY) || defined(HAVE_FORKPTY)
622#if !defined(HAVE_PTY_H) && !defined(HAVE_LIBUTIL_H)
623/* BSDI does not supply a prototype for the 'openpty' and 'forkpty'
624 functions, even though they are included in libutil. */
625#include <termios.h>
626extern int openpty(int *, int *, char *, struct termios *, struct winsize *);
Christian Heimes400adb02008-02-01 08:12:03 +0000627extern pid_t forkpty(int *, char *, struct termios *, struct winsize *);
Thomas Wouters1e0c2f42000-07-24 16:06:23 +0000628#endif /* !defined(HAVE_PTY_H) && !defined(HAVE_LIBUTIL_H) */
629#endif /* defined(HAVE_OPENPTY) || defined(HAVE_FORKPTY) */
630
631
Thomas Wouters49fd7fa2006-04-21 10:40:58 +0000632/* On 4.4BSD-descendants, ctype functions serves the whole range of
633 * wchar_t character set rather than single byte code points only.
634 * This characteristic can break some operations of string object
635 * including str.upper() and str.split() on UTF-8 locales. This
636 * workaround was provided by Tim Robbins of FreeBSD project.
637 */
Hye-Shik Changb5047fd2004-08-04 06:33:51 +0000638
639#ifdef __FreeBSD__
640#include <osreldate.h>
641#if __FreeBSD_version > 500039
Ronald Oussoren501aeff2010-04-18 15:02:38 +0000642# define _PY_PORT_CTYPE_UTF8_ISSUE
643#endif
644#endif
645
646
647#if defined(__APPLE__)
648# define _PY_PORT_CTYPE_UTF8_ISSUE
649#endif
650
651#ifdef _PY_PORT_CTYPE_UTF8_ISSUE
Hye-Shik Changb5047fd2004-08-04 06:33:51 +0000652#include <ctype.h>
653#include <wctype.h>
654#undef isalnum
655#define isalnum(c) iswalnum(btowc(c))
656#undef isalpha
657#define isalpha(c) iswalpha(btowc(c))
658#undef islower
659#define islower(c) iswlower(btowc(c))
660#undef isspace
661#define isspace(c) iswspace(btowc(c))
662#undef isupper
663#define isupper(c) iswupper(btowc(c))
664#undef tolower
665#define tolower(c) towlower(btowc(c))
666#undef toupper
667#define toupper(c) towupper(btowc(c))
668#endif
Hye-Shik Changb5047fd2004-08-04 06:33:51 +0000669
670
Mark Hammond8235ea12002-07-19 06:55:41 +0000671/* Declarations for symbol visibility.
672
673 PyAPI_FUNC(type): Declares a public Python API function and return type
Tim Peters4643bd92002-12-28 21:56:08 +0000674 PyAPI_DATA(type): Declares public Python data and its type
Mark Hammond8235ea12002-07-19 06:55:41 +0000675 PyMODINIT_FUNC: A Python module init function. If these functions are
Tim Peters4643bd92002-12-28 21:56:08 +0000676 inside the Python core, they are private to the core.
677 If in an extension module, it may be declared with
Mark Hammond8235ea12002-07-19 06:55:41 +0000678 external linkage depending on the platform.
679
680 As a number of platforms support/require "__declspec(dllimport/dllexport)",
681 we support a HAVE_DECLSPEC_DLL macro to save duplication.
682*/
683
Tim Peters4643bd92002-12-28 21:56:08 +0000684/*
Michael W. Hudsonf163d102003-02-10 19:36:46 +0000685 All windows ports, except cygwin, are handled in PC/pyconfig.h.
686
Skip Montanaroeb33e5a2007-08-17 12:57:41 +0000687 Cygwin is the only other autoconf platform requiring special
688 linkage handling and it uses __declspec().
Mark Hammond8235ea12002-07-19 06:55:41 +0000689*/
Skip Montanaroeb33e5a2007-08-17 12:57:41 +0000690#if defined(__CYGWIN__)
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000691# define HAVE_DECLSPEC_DLL
Peter Schneider-Kamp7e018902000-07-31 15:28:04 +0000692#endif
Mark Hammond8235ea12002-07-19 06:55:41 +0000693
Jason Tishler30765592003-09-04 11:04:06 +0000694/* only get special linkage if built as shared or platform is Cygwin */
695#if defined(Py_ENABLE_SHARED) || defined(__CYGWIN__)
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000696# if defined(HAVE_DECLSPEC_DLL)
697# ifdef Py_BUILD_CORE
698# define PyAPI_FUNC(RTYPE) __declspec(dllexport) RTYPE
699# define PyAPI_DATA(RTYPE) extern __declspec(dllexport) RTYPE
700 /* module init functions inside the core need no external linkage */
701 /* except for Cygwin to handle embedding */
702# if defined(__CYGWIN__)
703# define PyMODINIT_FUNC __declspec(dllexport) PyObject*
704# else /* __CYGWIN__ */
705# define PyMODINIT_FUNC PyObject*
706# endif /* __CYGWIN__ */
707# else /* Py_BUILD_CORE */
708 /* Building an extension module, or an embedded situation */
709 /* public Python functions and data are imported */
710 /* Under Cygwin, auto-import functions to prevent compilation */
711 /* failures similar to http://python.org/doc/FAQ.html#3.24 */
712# if !defined(__CYGWIN__)
713# define PyAPI_FUNC(RTYPE) __declspec(dllimport) RTYPE
714# endif /* !__CYGWIN__ */
715# define PyAPI_DATA(RTYPE) extern __declspec(dllimport) RTYPE
716 /* module init functions outside the core must be exported */
717# if defined(__cplusplus)
718# define PyMODINIT_FUNC extern "C" __declspec(dllexport) PyObject*
719# else /* __cplusplus */
720# define PyMODINIT_FUNC __declspec(dllexport) PyObject*
721# endif /* __cplusplus */
722# endif /* Py_BUILD_CORE */
723# endif /* HAVE_DECLSPEC */
Mark Hammond8235ea12002-07-19 06:55:41 +0000724#endif /* Py_ENABLE_SHARED */
725
726/* If no external linkage macros defined by now, create defaults */
727#ifndef PyAPI_FUNC
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000728# define PyAPI_FUNC(RTYPE) RTYPE
Mark Hammond8235ea12002-07-19 06:55:41 +0000729#endif
730#ifndef PyAPI_DATA
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000731# define PyAPI_DATA(RTYPE) extern RTYPE
Mark Hammond8235ea12002-07-19 06:55:41 +0000732#endif
733#ifndef PyMODINIT_FUNC
Antoine Pitrouf95a1b32010-05-09 15:52:27 +0000734# if defined(__cplusplus)
735# define PyMODINIT_FUNC extern "C" PyObject*
736# else /* __cplusplus */
737# define PyMODINIT_FUNC PyObject*
738# endif /* __cplusplus */
Mark Hammond8235ea12002-07-19 06:55:41 +0000739#endif
740
Fred Draked5fadf72000-09-26 05:46:01 +0000741/* limits.h constants that may be missing */
742
743#ifndef INT_MAX
744#define INT_MAX 2147483647
745#endif
746
747#ifndef LONG_MAX
748#if SIZEOF_LONG == 4
749#define LONG_MAX 0X7FFFFFFFL
750#elif SIZEOF_LONG == 8
751#define LONG_MAX 0X7FFFFFFFFFFFFFFFL
752#else
753#error "could not set LONG_MAX in pyport.h"
754#endif
755#endif
756
757#ifndef LONG_MIN
758#define LONG_MIN (-LONG_MAX-1)
759#endif
760
Tim Petersd57731f2000-10-05 01:42:25 +0000761#ifndef LONG_BIT
762#define LONG_BIT (8 * SIZEOF_LONG)
763#endif
764
765#if LONG_BIT != 8 * SIZEOF_LONG
766/* 04-Oct-2000 LONG_BIT is apparently (mis)defined as 64 on some recent
767 * 32-bit platforms using gcc. We try to catch that here at compile-time
768 * rather than waiting for integer multiplication to trigger bogus
769 * overflows.
770 */
Andrew M. Kuchling234fb632001-01-12 15:06:28 +0000771#error "LONG_BIT definition appears wrong for platform (bad gcc/glibc config?)."
Tim Petersd57731f2000-10-05 01:42:25 +0000772#endif
773
Tim Peters7d3a5112000-07-08 04:17:21 +0000774#ifdef __cplusplus
775}
776#endif
777
Neil Schemenauer15691082001-10-23 02:20:37 +0000778/*
779 * Hide GCC attributes from compilers that don't support them.
780 */
Guido van Rossumbd67d6f2001-10-27 21:16:16 +0000781#if (!defined(__GNUC__) || __GNUC__ < 2 || \
Skip Montanaro7a98be22007-08-16 14:35:24 +0000782 (__GNUC__ == 2 && __GNUC_MINOR__ < 7) )
Neil Schemenauer96aa0ac2002-09-15 14:09:54 +0000783#define Py_GCC_ATTRIBUTE(x)
784#else
785#define Py_GCC_ATTRIBUTE(x) __attribute__(x)
Neil Schemenauer15691082001-10-23 02:20:37 +0000786#endif
787
Thomas Wouters89f507f2006-12-13 04:49:30 +0000788/*
789 * Add PyArg_ParseTuple format where available.
790 */
791#ifdef HAVE_ATTRIBUTE_FORMAT_PARSETUPLE
792#define Py_FORMAT_PARSETUPLE(func,p1,p2) __attribute__((format(func,p1,p2)))
793#else
794#define Py_FORMAT_PARSETUPLE(func,p1,p2)
795#endif
796
Benjamin Peterson058e31e2009-01-16 03:54:08 +0000797/*
798 * Specify alignment on compilers that support it.
799 */
800#if defined(__GNUC__) && __GNUC__ >= 3
801#define Py_ALIGNED(x) __attribute__((aligned(x)))
802#else
803#define Py_ALIGNED(x)
804#endif
805
Nicholas Bastin9ba301e2004-07-15 15:54:05 +0000806/* Eliminate end-of-loop code not reached warnings from SunPro C
807 * when using do{...}while(0) macros
808 */
809#ifdef __SUNPRO_C
810#pragma error_messages (off,E_END_OF_LOOP_CODE_NOT_REACHED)
811#endif
812
Thomas Wouters477c8d52006-05-27 19:21:47 +0000813/*
814 * Older Microsoft compilers don't support the C99 long long literal suffixes,
815 * so these will be defined in PC/pyconfig.h for those compilers.
816 */
817#ifndef Py_LL
818#define Py_LL(x) x##LL
819#endif
820
821#ifndef Py_ULL
822#define Py_ULL(x) Py_LL(x##U)
823#endif
824
Tim Peters7d3a5112000-07-08 04:17:21 +0000825#endif /* Py_PYPORT_H */