Commit | Line | Data |
---|---|---|
920dae64 AT |
1 | #ifndef Py_PYPORT_H |
2 | #define Py_PYPORT_H | |
3 | ||
4 | #include "pyconfig.h" /* include for defines */ | |
5 | ||
6 | /************************************************************************** | |
7 | Symbols and macros to supply platform-independent interfaces to basic | |
8 | C language & library operations whose spellings vary across platforms. | |
9 | ||
10 | Please try to make documentation here as clear as possible: by definition, | |
11 | the stuff here is trying to illuminate C's darkest corners. | |
12 | ||
13 | Config #defines referenced here: | |
14 | ||
15 | SIGNED_RIGHT_SHIFT_ZERO_FILLS | |
16 | Meaning: To be defined iff i>>j does not extend the sign bit when i is a | |
17 | signed integral type and i < 0. | |
18 | Used in: Py_ARITHMETIC_RIGHT_SHIFT | |
19 | ||
20 | Py_DEBUG | |
21 | Meaning: Extra checks compiled in for debug mode. | |
22 | Used in: Py_SAFE_DOWNCAST | |
23 | ||
24 | HAVE_UINTPTR_T | |
25 | Meaning: The C9X type uintptr_t is supported by the compiler | |
26 | Used in: Py_uintptr_t | |
27 | ||
28 | HAVE_LONG_LONG | |
29 | Meaning: The compiler supports the C type "long long" | |
30 | Used in: PY_LONG_LONG | |
31 | ||
32 | **************************************************************************/ | |
33 | ||
34 | ||
35 | /* For backward compatibility only. Obsolete, do not use. */ | |
36 | #ifdef HAVE_PROTOTYPES | |
37 | #define Py_PROTO(x) x | |
38 | #else | |
39 | #define Py_PROTO(x) () | |
40 | #endif | |
41 | #ifndef Py_FPROTO | |
42 | #define Py_FPROTO(x) Py_PROTO(x) | |
43 | #endif | |
44 | ||
45 | /* typedefs for some C9X-defined synonyms for integral types. | |
46 | * | |
47 | * The names in Python are exactly the same as the C9X names, except with a | |
48 | * Py_ prefix. Until C9X is universally implemented, this is the only way | |
49 | * to ensure that Python gets reliable names that don't conflict with names | |
50 | * in non-Python code that are playing their own tricks to define the C9X | |
51 | * names. | |
52 | * | |
53 | * NOTE: don't go nuts here! Python has no use for *most* of the C9X | |
54 | * integral synonyms. Only define the ones we actually need. | |
55 | */ | |
56 | ||
57 | #ifdef HAVE_LONG_LONG | |
58 | #ifndef PY_LONG_LONG | |
59 | #define PY_LONG_LONG long long | |
60 | #endif | |
61 | #endif /* HAVE_LONG_LONG */ | |
62 | ||
63 | /* uintptr_t is the C9X name for an unsigned integral type such that a | |
64 | * legitimate void* can be cast to uintptr_t and then back to void* again | |
65 | * without loss of information. Similarly for intptr_t, wrt a signed | |
66 | * integral type. | |
67 | */ | |
68 | #ifdef HAVE_UINTPTR_T | |
69 | typedef uintptr_t Py_uintptr_t; | |
70 | typedef intptr_t Py_intptr_t; | |
71 | ||
72 | #elif SIZEOF_VOID_P <= SIZEOF_INT | |
73 | typedef unsigned int Py_uintptr_t; | |
74 | typedef int Py_intptr_t; | |
75 | ||
76 | #elif SIZEOF_VOID_P <= SIZEOF_LONG | |
77 | typedef unsigned long Py_uintptr_t; | |
78 | typedef long Py_intptr_t; | |
79 | ||
80 | #elif defined(HAVE_LONG_LONG) && (SIZEOF_VOID_P <= SIZEOF_LONG_LONG) | |
81 | typedef unsigned PY_LONG_LONG Py_uintptr_t; | |
82 | typedef PY_LONG_LONG Py_intptr_t; | |
83 | ||
84 | #else | |
85 | # error "Python needs a typedef for Py_uintptr_t in pyport.h." | |
86 | #endif /* HAVE_UINTPTR_T */ | |
87 | ||
88 | #include <stdlib.h> | |
89 | ||
90 | #include <math.h> /* Moved here from the math section, before extern "C" */ | |
91 | ||
92 | /******************************************** | |
93 | * WRAPPER FOR <time.h> and/or <sys/time.h> * | |
94 | ********************************************/ | |
95 | ||
96 | #ifdef TIME_WITH_SYS_TIME | |
97 | #include <sys/time.h> | |
98 | #include <time.h> | |
99 | #else /* !TIME_WITH_SYS_TIME */ | |
100 | #ifdef HAVE_SYS_TIME_H | |
101 | #include <sys/time.h> | |
102 | #else /* !HAVE_SYS_TIME_H */ | |
103 | #include <time.h> | |
104 | #endif /* !HAVE_SYS_TIME_H */ | |
105 | #endif /* !TIME_WITH_SYS_TIME */ | |
106 | ||
107 | ||
108 | /****************************** | |
109 | * WRAPPER FOR <sys/select.h> * | |
110 | ******************************/ | |
111 | ||
112 | /* NB caller must include <sys/types.h> */ | |
113 | ||
114 | #ifdef HAVE_SYS_SELECT_H | |
115 | ||
116 | #include <sys/select.h> | |
117 | ||
118 | #endif /* !HAVE_SYS_SELECT_H */ | |
119 | ||
120 | /******************************* | |
121 | * stat() and fstat() fiddling * | |
122 | *******************************/ | |
123 | ||
124 | /* We expect that stat and fstat exist on most systems. | |
125 | * It's confirmed on Unix, Mac and Windows. | |
126 | * If you don't have them, add | |
127 | * #define DONT_HAVE_STAT | |
128 | * and/or | |
129 | * #define DONT_HAVE_FSTAT | |
130 | * to your pyconfig.h. Python code beyond this should check HAVE_STAT and | |
131 | * HAVE_FSTAT instead. | |
132 | * Also | |
133 | * #define DONT_HAVE_SYS_STAT_H | |
134 | * if <sys/stat.h> doesn't exist on your platform, and | |
135 | * #define HAVE_STAT_H | |
136 | * if <stat.h> does (don't look at me -- ths mess is inherited). | |
137 | */ | |
138 | #ifndef DONT_HAVE_STAT | |
139 | #define HAVE_STAT | |
140 | #endif | |
141 | ||
142 | #ifndef DONT_HAVE_FSTAT | |
143 | #define HAVE_FSTAT | |
144 | #endif | |
145 | ||
146 | #ifdef RISCOS | |
147 | #include <sys/types.h> | |
148 | #include "unixstuff.h" | |
149 | #endif | |
150 | ||
151 | #ifndef DONT_HAVE_SYS_STAT_H | |
152 | #if defined(PYOS_OS2) && defined(PYCC_GCC) | |
153 | #include <sys/types.h> | |
154 | #endif | |
155 | #include <sys/stat.h> | |
156 | #elif defined(HAVE_STAT_H) | |
157 | #include <stat.h> | |
158 | #endif | |
159 | ||
160 | #if defined(PYCC_VACPP) | |
161 | /* VisualAge C/C++ Failed to Define MountType Field in sys/stat.h */ | |
162 | #define S_IFMT (S_IFDIR|S_IFCHR|S_IFREG) | |
163 | #endif | |
164 | ||
165 | #ifndef S_ISREG | |
166 | #define S_ISREG(x) (((x) & S_IFMT) == S_IFREG) | |
167 | #endif | |
168 | ||
169 | #ifndef S_ISDIR | |
170 | #define S_ISDIR(x) (((x) & S_IFMT) == S_IFDIR) | |
171 | #endif | |
172 | ||
173 | ||
174 | #ifdef __cplusplus | |
175 | /* Move this down here since some C++ #include's don't like to be included | |
176 | inside an extern "C" */ | |
177 | extern "C" { | |
178 | #endif | |
179 | ||
180 | ||
181 | /* Py_ARITHMETIC_RIGHT_SHIFT | |
182 | * C doesn't define whether a right-shift of a signed integer sign-extends | |
183 | * or zero-fills. Here a macro to force sign extension: | |
184 | * Py_ARITHMETIC_RIGHT_SHIFT(TYPE, I, J) | |
185 | * Return I >> J, forcing sign extension. | |
186 | * Requirements: | |
187 | * I is of basic signed type TYPE (char, short, int, long, or long long). | |
188 | * TYPE is one of char, short, int, long, or long long, although long long | |
189 | * must not be used except on platforms that support it. | |
190 | * J is an integer >= 0 and strictly less than the number of bits in TYPE | |
191 | * (because C doesn't define what happens for J outside that range either). | |
192 | * Caution: | |
193 | * I may be evaluated more than once. | |
194 | */ | |
195 | #ifdef SIGNED_RIGHT_SHIFT_ZERO_FILLS | |
196 | #define Py_ARITHMETIC_RIGHT_SHIFT(TYPE, I, J) \ | |
197 | ((I) < 0 ? ~((~(unsigned TYPE)(I)) >> (J)) : (I) >> (J)) | |
198 | #else | |
199 | #define Py_ARITHMETIC_RIGHT_SHIFT(TYPE, I, J) ((I) >> (J)) | |
200 | #endif | |
201 | ||
202 | /* Py_FORCE_EXPANSION(X) | |
203 | * "Simply" returns its argument. However, macro expansions within the | |
204 | * argument are evaluated. This unfortunate trickery is needed to get | |
205 | * token-pasting to work as desired in some cases. | |
206 | */ | |
207 | #define Py_FORCE_EXPANSION(X) X | |
208 | ||
209 | /* Py_SAFE_DOWNCAST(VALUE, WIDE, NARROW) | |
210 | * Cast VALUE to type NARROW from type WIDE. In Py_DEBUG mode, this | |
211 | * assert-fails if any information is lost. | |
212 | * Caution: | |
213 | * VALUE may be evaluated more than once. | |
214 | */ | |
215 | #ifdef Py_DEBUG | |
216 | #define Py_SAFE_DOWNCAST(VALUE, WIDE, NARROW) \ | |
217 | (assert((WIDE)(NARROW)(VALUE) == (VALUE)), (NARROW)(VALUE)) | |
218 | #else | |
219 | #define Py_SAFE_DOWNCAST(VALUE, WIDE, NARROW) (NARROW)(VALUE) | |
220 | #endif | |
221 | ||
222 | /* Py_IS_NAN(X) | |
223 | * Return 1 if float or double arg is a NaN, else 0. | |
224 | * Caution: | |
225 | * X is evaluated more than once. | |
226 | * This may not work on all platforms. Each platform has *some* | |
227 | * way to spell this, though -- override in pyconfig.h if you have | |
228 | * a platform where it doesn't work. | |
229 | */ | |
230 | #ifndef Py_IS_NAN | |
231 | #define Py_IS_NAN(X) ((X) != (X)) | |
232 | #endif | |
233 | ||
234 | /* Py_IS_INFINITY(X) | |
235 | * Return 1 if float or double arg is an infinity, else 0. | |
236 | * Caution: | |
237 | * X is evaluated more than once. | |
238 | * This implementation may set the underflow flag if |X| is very small; | |
239 | * it really can't be implemented correctly (& easily) before C99. | |
240 | * Override in pyconfig.h if you have a better spelling on your platform. | |
241 | */ | |
242 | #ifndef Py_IS_INFINITY | |
243 | #define Py_IS_INFINITY(X) ((X) && (X)*0.5 == (X)) | |
244 | #endif | |
245 | ||
246 | /* HUGE_VAL is supposed to expand to a positive double infinity. Python | |
247 | * uses Py_HUGE_VAL instead because some platforms are broken in this | |
248 | * respect. We used to embed code in pyport.h to try to worm around that, | |
249 | * but different platforms are broken in conflicting ways. If you're on | |
250 | * a platform where HUGE_VAL is defined incorrectly, fiddle your Python | |
251 | * config to #define Py_HUGE_VAL to something that works on your platform. | |
252 | */ | |
253 | #ifndef Py_HUGE_VAL | |
254 | #define Py_HUGE_VAL HUGE_VAL | |
255 | #endif | |
256 | ||
257 | /* Py_OVERFLOWED(X) | |
258 | * Return 1 iff a libm function overflowed. Set errno to 0 before calling | |
259 | * a libm function, and invoke this macro after, passing the function | |
260 | * result. | |
261 | * Caution: | |
262 | * This isn't reliable. C99 no longer requires libm to set errno under | |
263 | * any exceptional condition, but does require +- HUGE_VAL return | |
264 | * values on overflow. A 754 box *probably* maps HUGE_VAL to a | |
265 | * double infinity, and we're cool if that's so, unless the input | |
266 | * was an infinity and an infinity is the expected result. A C89 | |
267 | * system sets errno to ERANGE, so we check for that too. We're | |
268 | * out of luck if a C99 754 box doesn't map HUGE_VAL to +Inf, or | |
269 | * if the returned result is a NaN, or if a C89 box returns HUGE_VAL | |
270 | * in non-overflow cases. | |
271 | * X is evaluated more than once. | |
272 | * Some platforms have better way to spell this, so expect some #ifdef'ery. | |
273 | * | |
274 | * OpenBSD uses 'isinf()' because a compiler bug on that platform causes | |
275 | * the longer macro version to be mis-compiled. This isn't optimal, and | |
276 | * should be removed once a newer compiler is available on that platform. | |
277 | * The system that had the failure was running OpenBSD 3.2 on Intel, with | |
278 | * gcc 2.95.3. | |
279 | * | |
280 | * According to Tim's checkin, the FreeBSD systems use isinf() to work | |
281 | * around a FPE bug on that platform. | |
282 | */ | |
283 | #if defined(__FreeBSD__) || defined(__OpenBSD__) | |
284 | #define Py_OVERFLOWED(X) isinf(X) | |
285 | #else | |
286 | #define Py_OVERFLOWED(X) ((X) != 0.0 && (errno == ERANGE || \ | |
287 | (X) == Py_HUGE_VAL || \ | |
288 | (X) == -Py_HUGE_VAL)) | |
289 | #endif | |
290 | ||
291 | /* Py_SET_ERRNO_ON_MATH_ERROR(x) | |
292 | * If a libm function did not set errno, but it looks like the result | |
293 | * overflowed or not-a-number, set errno to ERANGE or EDOM. Set errno | |
294 | * to 0 before calling a libm function, and invoke this macro after, | |
295 | * passing the function result. | |
296 | * Caution: | |
297 | * This isn't reliable. See Py_OVERFLOWED comments. | |
298 | * X is evaluated more than once. | |
299 | */ | |
300 | #if defined(__FreeBSD__) || defined(__OpenBSD__) || (defined(__hpux) && defined(__ia64)) | |
301 | #define _Py_SET_EDOM_FOR_NAN(X) if (isnan(X)) errno = EDOM; | |
302 | #else | |
303 | #define _Py_SET_EDOM_FOR_NAN(X) ; | |
304 | #endif | |
305 | #define Py_SET_ERRNO_ON_MATH_ERROR(X) \ | |
306 | do { \ | |
307 | if (errno == 0) { \ | |
308 | if ((X) == Py_HUGE_VAL || (X) == -Py_HUGE_VAL) \ | |
309 | errno = ERANGE; \ | |
310 | else _Py_SET_EDOM_FOR_NAN(X) \ | |
311 | } \ | |
312 | } while(0) | |
313 | ||
314 | /* Py_SET_ERANGE_ON_OVERFLOW(x) | |
315 | * An alias of Py_SET_ERRNO_ON_MATH_ERROR for backward-compatibility. | |
316 | */ | |
317 | #define Py_SET_ERANGE_IF_OVERFLOW(X) Py_SET_ERRNO_ON_MATH_ERROR(X) | |
318 | ||
319 | /* Py_ADJUST_ERANGE1(x) | |
320 | * Py_ADJUST_ERANGE2(x, y) | |
321 | * Set errno to 0 before calling a libm function, and invoke one of these | |
322 | * macros after, passing the function result(s) (Py_ADJUST_ERANGE2 is useful | |
323 | * for functions returning complex results). This makes two kinds of | |
324 | * adjustments to errno: (A) If it looks like the platform libm set | |
325 | * errno=ERANGE due to underflow, clear errno. (B) If it looks like the | |
326 | * platform libm overflowed but didn't set errno, force errno to ERANGE. In | |
327 | * effect, we're trying to force a useful implementation of C89 errno | |
328 | * behavior. | |
329 | * Caution: | |
330 | * This isn't reliable. See Py_OVERFLOWED comments. | |
331 | * X and Y may be evaluated more than once. | |
332 | */ | |
333 | #define Py_ADJUST_ERANGE1(X) \ | |
334 | do { \ | |
335 | if (errno == 0) { \ | |
336 | if ((X) == Py_HUGE_VAL || (X) == -Py_HUGE_VAL) \ | |
337 | errno = ERANGE; \ | |
338 | } \ | |
339 | else if (errno == ERANGE && (X) == 0.0) \ | |
340 | errno = 0; \ | |
341 | } while(0) | |
342 | ||
343 | #define Py_ADJUST_ERANGE2(X, Y) \ | |
344 | do { \ | |
345 | if ((X) == Py_HUGE_VAL || (X) == -Py_HUGE_VAL || \ | |
346 | (Y) == Py_HUGE_VAL || (Y) == -Py_HUGE_VAL) { \ | |
347 | if (errno == 0) \ | |
348 | errno = ERANGE; \ | |
349 | } \ | |
350 | else if (errno == ERANGE) \ | |
351 | errno = 0; \ | |
352 | } while(0) | |
353 | ||
354 | /* Py_DEPRECATED(version) | |
355 | * Declare a variable, type, or function deprecated. | |
356 | * Usage: | |
357 | * extern int old_var Py_DEPRECATED(2.3); | |
358 | * typedef int T1 Py_DEPRECATED(2.4); | |
359 | * extern int x() Py_DEPRECATED(2.5); | |
360 | */ | |
361 | #if defined(__GNUC__) && (__GNUC__ == 3) && (__GNUC_MINOR__ >= 1) | |
362 | #define Py_DEPRECATED(VERSION_UNUSED) __attribute__((__deprecated__)) | |
363 | #else | |
364 | #define Py_DEPRECATED(VERSION_UNUSED) | |
365 | #endif | |
366 | ||
367 | /************************************************************************** | |
368 | Prototypes that are missing from the standard include files on some systems | |
369 | (and possibly only some versions of such systems.) | |
370 | ||
371 | Please be conservative with adding new ones, document them and enclose them | |
372 | in platform-specific #ifdefs. | |
373 | **************************************************************************/ | |
374 | ||
375 | #ifdef SOLARIS | |
376 | /* Unchecked */ | |
377 | extern int gethostname(char *, int); | |
378 | #endif | |
379 | ||
380 | #ifdef __BEOS__ | |
381 | /* Unchecked */ | |
382 | /* It's in the libs, but not the headers... - [cjh] */ | |
383 | int shutdown( int, int ); | |
384 | #endif | |
385 | ||
386 | #ifdef HAVE__GETPTY | |
387 | #include <sys/types.h> /* we need to import mode_t */ | |
388 | extern char * _getpty(int *, int, mode_t, int); | |
389 | #endif | |
390 | ||
391 | #if defined(HAVE_OPENPTY) || defined(HAVE_FORKPTY) | |
392 | #if !defined(HAVE_PTY_H) && !defined(HAVE_LIBUTIL_H) | |
393 | /* BSDI does not supply a prototype for the 'openpty' and 'forkpty' | |
394 | functions, even though they are included in libutil. */ | |
395 | #include <termios.h> | |
396 | extern int openpty(int *, int *, char *, struct termios *, struct winsize *); | |
397 | extern int forkpty(int *, char *, struct termios *, struct winsize *); | |
398 | #endif /* !defined(HAVE_PTY_H) && !defined(HAVE_LIBUTIL_H) */ | |
399 | #endif /* defined(HAVE_OPENPTY) || defined(HAVE_FORKPTY) */ | |
400 | ||
401 | ||
402 | /* These are pulled from various places. It isn't obvious on what platforms | |
403 | they are necessary, nor what the exact prototype should look like (which | |
404 | is likely to vary between platforms!) If you find you need one of these | |
405 | declarations, please move them to a platform-specific block and include | |
406 | proper prototypes. */ | |
407 | #if 0 | |
408 | ||
409 | /* From Modules/resource.c */ | |
410 | extern int getrusage(); | |
411 | extern int getpagesize(); | |
412 | ||
413 | /* From Python/sysmodule.c and Modules/posixmodule.c */ | |
414 | extern int fclose(FILE *); | |
415 | ||
416 | /* From Modules/posixmodule.c */ | |
417 | extern int fdatasync(int); | |
418 | #endif /* 0 */ | |
419 | ||
420 | ||
421 | /************************ | |
422 | * WRAPPER FOR <math.h> * | |
423 | ************************/ | |
424 | ||
425 | #ifndef HAVE_HYPOT | |
426 | extern double hypot(double, double); | |
427 | #endif | |
428 | ||
429 | ||
430 | /******************************************************************* | |
431 | On 4.4BSD-descendants, ctype functions serves the whole range of | |
432 | wchar_t character set rather than single byte code points only. | |
433 | This characteristic can break some operations of string object | |
434 | including str.upper() and str.split() on UTF-8 locales. This | |
435 | workaround was provided by Tim Robbins of FreeBSD project. He said | |
436 | the incompatibility will be fixed in FreeBSD 6. | |
437 | ********************************************************************/ | |
438 | ||
439 | #ifdef __FreeBSD__ | |
440 | #include <osreldate.h> | |
441 | #if __FreeBSD_version > 500039 | |
442 | #include <ctype.h> | |
443 | #include <wctype.h> | |
444 | #undef isalnum | |
445 | #define isalnum(c) iswalnum(btowc(c)) | |
446 | #undef isalpha | |
447 | #define isalpha(c) iswalpha(btowc(c)) | |
448 | #undef islower | |
449 | #define islower(c) iswlower(btowc(c)) | |
450 | #undef isspace | |
451 | #define isspace(c) iswspace(btowc(c)) | |
452 | #undef isupper | |
453 | #define isupper(c) iswupper(btowc(c)) | |
454 | #undef tolower | |
455 | #define tolower(c) towlower(btowc(c)) | |
456 | #undef toupper | |
457 | #define toupper(c) towupper(btowc(c)) | |
458 | #endif | |
459 | #endif | |
460 | ||
461 | ||
462 | /* Declarations for symbol visibility. | |
463 | ||
464 | PyAPI_FUNC(type): Declares a public Python API function and return type | |
465 | PyAPI_DATA(type): Declares public Python data and its type | |
466 | PyMODINIT_FUNC: A Python module init function. If these functions are | |
467 | inside the Python core, they are private to the core. | |
468 | If in an extension module, it may be declared with | |
469 | external linkage depending on the platform. | |
470 | ||
471 | As a number of platforms support/require "__declspec(dllimport/dllexport)", | |
472 | we support a HAVE_DECLSPEC_DLL macro to save duplication. | |
473 | */ | |
474 | ||
475 | /* | |
476 | All windows ports, except cygwin, are handled in PC/pyconfig.h. | |
477 | ||
478 | BeOS and cygwin are the only other autoconf platform requiring special | |
479 | linkage handling and both of these use __declspec(). | |
480 | */ | |
481 | #if defined(__CYGWIN__) || defined(__BEOS__) | |
482 | # define HAVE_DECLSPEC_DLL | |
483 | #endif | |
484 | ||
485 | /* only get special linkage if built as shared or platform is Cygwin */ | |
486 | #if defined(Py_ENABLE_SHARED) || defined(__CYGWIN__) | |
487 | # if defined(HAVE_DECLSPEC_DLL) | |
488 | # ifdef Py_BUILD_CORE | |
489 | # define PyAPI_FUNC(RTYPE) __declspec(dllexport) RTYPE | |
490 | # define PyAPI_DATA(RTYPE) extern __declspec(dllexport) RTYPE | |
491 | /* module init functions inside the core need no external linkage */ | |
492 | /* except for Cygwin to handle embedding (FIXME: BeOS too?) */ | |
493 | # if defined(__CYGWIN__) | |
494 | # define PyMODINIT_FUNC __declspec(dllexport) void | |
495 | # else /* __CYGWIN__ */ | |
496 | # define PyMODINIT_FUNC void | |
497 | # endif /* __CYGWIN__ */ | |
498 | # else /* Py_BUILD_CORE */ | |
499 | /* Building an extension module, or an embedded situation */ | |
500 | /* public Python functions and data are imported */ | |
501 | /* Under Cygwin, auto-import functions to prevent compilation */ | |
502 | /* failures similar to http://python.org/doc/FAQ.html#3.24 */ | |
503 | # if !defined(__CYGWIN__) | |
504 | # define PyAPI_FUNC(RTYPE) __declspec(dllimport) RTYPE | |
505 | # endif /* !__CYGWIN__ */ | |
506 | # define PyAPI_DATA(RTYPE) extern __declspec(dllimport) RTYPE | |
507 | /* module init functions outside the core must be exported */ | |
508 | # if defined(__cplusplus) | |
509 | # define PyMODINIT_FUNC extern "C" __declspec(dllexport) void | |
510 | # else /* __cplusplus */ | |
511 | # define PyMODINIT_FUNC __declspec(dllexport) void | |
512 | # endif /* __cplusplus */ | |
513 | # endif /* Py_BUILD_CORE */ | |
514 | # endif /* HAVE_DECLSPEC */ | |
515 | #endif /* Py_ENABLE_SHARED */ | |
516 | ||
517 | /* If no external linkage macros defined by now, create defaults */ | |
518 | #ifndef PyAPI_FUNC | |
519 | # define PyAPI_FUNC(RTYPE) RTYPE | |
520 | #endif | |
521 | #ifndef PyAPI_DATA | |
522 | # define PyAPI_DATA(RTYPE) extern RTYPE | |
523 | #endif | |
524 | #ifndef PyMODINIT_FUNC | |
525 | # if defined(__cplusplus) | |
526 | # define PyMODINIT_FUNC extern "C" void | |
527 | # else /* __cplusplus */ | |
528 | # define PyMODINIT_FUNC void | |
529 | # endif /* __cplusplus */ | |
530 | #endif | |
531 | ||
532 | /* Deprecated DL_IMPORT and DL_EXPORT macros */ | |
533 | #if defined(Py_ENABLE_SHARED) && defined (HAVE_DECLSPEC_DLL) | |
534 | # if defined(Py_BUILD_CORE) | |
535 | # define DL_IMPORT(RTYPE) __declspec(dllexport) RTYPE | |
536 | # define DL_EXPORT(RTYPE) __declspec(dllexport) RTYPE | |
537 | # else | |
538 | # define DL_IMPORT(RTYPE) __declspec(dllimport) RTYPE | |
539 | # define DL_EXPORT(RTYPE) __declspec(dllexport) RTYPE | |
540 | # endif | |
541 | #endif | |
542 | #ifndef DL_EXPORT | |
543 | # define DL_EXPORT(RTYPE) RTYPE | |
544 | #endif | |
545 | #ifndef DL_IMPORT | |
546 | # define DL_IMPORT(RTYPE) RTYPE | |
547 | #endif | |
548 | /* End of deprecated DL_* macros */ | |
549 | ||
550 | /* If the fd manipulation macros aren't defined, | |
551 | here is a set that should do the job */ | |
552 | ||
553 | #if 0 /* disabled and probably obsolete */ | |
554 | ||
555 | #ifndef FD_SETSIZE | |
556 | #define FD_SETSIZE 256 | |
557 | #endif | |
558 | ||
559 | #ifndef FD_SET | |
560 | ||
561 | typedef long fd_mask; | |
562 | ||
563 | #define NFDBITS (sizeof(fd_mask) * NBBY) /* bits per mask */ | |
564 | #ifndef howmany | |
565 | #define howmany(x, y) (((x)+((y)-1))/(y)) | |
566 | #endif /* howmany */ | |
567 | ||
568 | typedef struct fd_set { | |
569 | fd_mask fds_bits[howmany(FD_SETSIZE, NFDBITS)]; | |
570 | } fd_set; | |
571 | ||
572 | #define FD_SET(n, p) ((p)->fds_bits[(n)/NFDBITS] |= (1 << ((n) % NFDBITS))) | |
573 | #define FD_CLR(n, p) ((p)->fds_bits[(n)/NFDBITS] &= ~(1 << ((n) % NFDBITS))) | |
574 | #define FD_ISSET(n, p) ((p)->fds_bits[(n)/NFDBITS] & (1 << ((n) % NFDBITS))) | |
575 | #define FD_ZERO(p) memset((char *)(p), '\0', sizeof(*(p))) | |
576 | ||
577 | #endif /* FD_SET */ | |
578 | ||
579 | #endif /* fd manipulation macros */ | |
580 | ||
581 | ||
582 | /* limits.h constants that may be missing */ | |
583 | ||
584 | #ifndef INT_MAX | |
585 | #define INT_MAX 2147483647 | |
586 | #endif | |
587 | ||
588 | #ifndef LONG_MAX | |
589 | #if SIZEOF_LONG == 4 | |
590 | #define LONG_MAX 0X7FFFFFFFL | |
591 | #elif SIZEOF_LONG == 8 | |
592 | #define LONG_MAX 0X7FFFFFFFFFFFFFFFL | |
593 | #else | |
594 | #error "could not set LONG_MAX in pyport.h" | |
595 | #endif | |
596 | #endif | |
597 | ||
598 | #ifndef LONG_MIN | |
599 | #define LONG_MIN (-LONG_MAX-1) | |
600 | #endif | |
601 | ||
602 | #ifndef LONG_BIT | |
603 | #define LONG_BIT (8 * SIZEOF_LONG) | |
604 | #endif | |
605 | ||
606 | #if LONG_BIT != 8 * SIZEOF_LONG | |
607 | /* 04-Oct-2000 LONG_BIT is apparently (mis)defined as 64 on some recent | |
608 | * 32-bit platforms using gcc. We try to catch that here at compile-time | |
609 | * rather than waiting for integer multiplication to trigger bogus | |
610 | * overflows. | |
611 | */ | |
612 | #error "LONG_BIT definition appears wrong for platform (bad gcc/glibc config?)." | |
613 | #endif | |
614 | ||
615 | #ifdef __cplusplus | |
616 | } | |
617 | #endif | |
618 | ||
619 | /* | |
620 | * Hide GCC attributes from compilers that don't support them. | |
621 | */ | |
622 | #if (!defined(__GNUC__) || __GNUC__ < 2 || \ | |
623 | (__GNUC__ == 2 && __GNUC_MINOR__ < 7) ) && \ | |
624 | !defined(RISCOS) | |
625 | #define Py_GCC_ATTRIBUTE(x) | |
626 | #else | |
627 | #define Py_GCC_ATTRIBUTE(x) __attribute__(x) | |
628 | #endif | |
629 | ||
630 | /* Eliminate end-of-loop code not reached warnings from SunPro C | |
631 | * when using do{...}while(0) macros | |
632 | */ | |
633 | #ifdef __SUNPRO_C | |
634 | #pragma error_messages (off,E_END_OF_LOOP_CODE_NOT_REACHED) | |
635 | #endif | |
636 | ||
637 | #endif /* Py_PYPORT_H */ |